| Class TxyGetDataSource (unit xyGetSrc) |
TForm
| Constructors |
| Functions |
procedure AllDblClick(Sender: TObject);
procedure ComboBox1Change(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure updateDataSourcesPage;
procedure updateODBCPage;
procedure updateQueryPage;
procedure updateTablesPage;
procedure updatexyHoldersPage;| Properties |
| Events |
| Variables |
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
ComboBox1 : TComboBox;
ComboBox2 : TComboBox;
ComboBox3 : TComboBox;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
ListBox1 : TListBox;
ListBox2 : TListBox;
ListBox3 : TListBox;
Memo1 : TMemo;
Memo2 : TMemo;
Notebook1 : TNotebook;
CurrSource : string;| Constructors |
| Functions |
procedure AllDblClick(Sender: TObject);
procedure ComboBox1Change(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure updateDataSourcesPage;
procedure updateODBCPage;both 32bit delphi's have datamodules as well. check these first
procedure updateQueryPage;
procedure updateTablesPage;Private declarations
procedure updatexyHoldersPage;look through all forms for any datasource with a name matching datasourcename and then get it's dataset} {$IFDEF WIN32} //both 32bit delphi's have datamodules as well. check these first
| Properties |
| Events |
| Variables |
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
ComboBox1 : TComboBox;
ComboBox2 : TComboBox;
ComboBox3 : TComboBox;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
ListBox1 : TListBox;
ListBox2 : TListBox;
ListBox3 : TListBox;
Memo1 : TMemo;
Memo2 : TMemo;
Notebook1 : TNotebook;
CurrSource : string;Public declarations