ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/examples/DBAdmin/MainFormUnit.pas
(Generate patch)

Comparing ibx/trunk/examples/DBAdmin/MainFormUnit.pas (file contents):
Revision 266 by tony, Thu Dec 6 15:55:01 2018 UTC vs.
Revision 267 by tony, Fri Dec 28 10:44:23 2018 UTC

# Line 35 | Line 35 | type
35      AccessRightsPopup: TPopupMenu;
36      AccessRightsSource: TDataSource;
37      ClientLibrary: TLabel;
38 +    Label44: TLabel;
39 +    ClientServerVersion: TMemo;
40      MenuItem20: TMenuItem;
41      MenuItem21: TMenuItem;
42      RunScript: TAction;
# Line 1077 | Line 1079 | begin
1079        PagesAvail.Text := 'n/a';
1080        AutoAdmin.Checked :=  false;
1081      end;
1082 +    DatabaseData.IBDatabase1.Attachment.getFBVersion(ClientServerVersion.Lines);
1083      DBComments.Lines.Text := DatabaseData.Description;
1084    finally
1085      FLoading := false;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines