Class TForm1 (unit LookMain)

Inherits from

TForm

Constructors



Functions

procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);

Because we use run-time IProvider assignment, we must set these properties} {at run-time as well.

Properties

Events

Variables

cdsCustomer : TClientDataSet;


cdsOrders : TClientDataSet;


DBEdit1 : TDBEdit;


DBGrid1 : TDBGrid;


DBLookupComboBox1 : TDBLookupComboBox;


dsCustomer : TDataSource;


dsOrders : TDataSource;


tblCustomer : TTable;


tblOrders : TTable;


FLookupFile : string;

Private declarations


Constructors


Functions


procedure FormCreate(Sender: TObject);


procedure FormDestroy(Sender: TObject);

Because we use run-time IProvider assignment, we must set these properties} {at run-time as well.


Properties


Events


Variables


cdsCustomer : TClientDataSet;


cdsOrders : TClientDataSet;


DBEdit1 : TDBEdit;


DBGrid1 : TDBGrid;


DBLookupComboBox1 : TDBLookupComboBox;


dsCustomer : TDataSource;


dsOrders : TDataSource;


tblCustomer : TTable;


tblOrders : TTable;


FLookupFile : string;

Private declarations