| Class TDemoIteratingControls (unit GPDBNav97Demo) |
TForm
Paul Rice 6/6/1998 Demo iteration through a DBNavigator Controls property in order to get the enabled/disabled state of its buttons. In this case, menu items are synchronized with the buttons. Use TNavButton vs. TGPNavButton97 for a standard DBNavigator.
| Constructors |
| Functions |
procedure DataSource1DataChange(Sender: TObject; Field: TField);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure SyncMenuWithDBNav;| Properties |
| Events |
| Variables |
Cancel1 : TMenuItem;
DataSource1 : TDataSource;
Delete1 : TMenuItem;
Edit1 : TMenuItem;
First1 : TMenuItem;
GPDBNavigator971 : TGPDBNavigator97;
Insert1 : TMenuItem;
Last1 : TMenuItem;
MainMenu1 : TMainMenu;
Next1 : TMenuItem;
Post1 : TMenuItem;
Prior1 : TMenuItem;
Refresh1 : TMenuItem;
Sync1 : TMenuItem;
Table1 : TTable;| Constructors |
| Functions |
procedure DataSource1DataChange(Sender: TObject; Field: TField);with GPDBNavigator971
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure SyncMenuWithDBNav;| Properties |
| Events |
| Variables |
Cancel1 : TMenuItem;
DataSource1 : TDataSource;
Delete1 : TMenuItem;
Edit1 : TMenuItem;
First1 : TMenuItem;
GPDBNavigator971 : TGPDBNavigator97;
Insert1 : TMenuItem;
Last1 : TMenuItem;
MainMenu1 : TMainMenu;
Next1 : TMenuItem;
Post1 : TMenuItem;
Prior1 : TMenuItem;
Refresh1 : TMenuItem;
Sync1 : TMenuItem;
Table1 : TTable;