Class TxyGetDataSource (unit xyGetSrc)

Inherits from

TForm

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.

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.

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


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