Class TFormSelectDialog (unit Fsddemo)
Inherits from
TForm
Constructors
Functions
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
Properties
Events
Variables
DBGrid1 : TDBGrid;
DBNavigator1 : TDBNavigator;
DSDept : TDataSource;
DSPersonnel : TDataSource;
Label1 : TLabel;
Label10 : TLabel;
Label11 : TLabel;
Label12 : TLabel;
Label13 : TLabel;
Label2 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
LookupDialog1 : TLookupDialog;
Panel1 : TPanel;
Panel2 : TPanel;
SelectDialog1 : TSelectDialog;
SelectDialog2 : TSelectDialog;
SelectDialog3 : TSelectDialog;
TabbedNotebook1 : TTabbedNotebook;
TableDept : TTable;
TableDeptDateEstablished : TDateField;
TableDeptDepartmentID : TStringField;
TableDeptDescription : TStringField;
TableDeptManagerID : TStringField;
TableDeptOperatingCost : TCurrencyField;
TableDeptOwnerDept : TStringField;
TableDeptStaffSize : TSmallintField;
TableDeptStaffTurnover : TFloatField;
TablePersonnel : TTable;
TablePersonnelBoss : TStringField;
TablePersonnelEmpNo : TStringField;
TablePersonnelFirstName : TStringField;
TablePersonnelHireDate : TDateTimeField;
TablePersonnelLastName : TStringField;
TablePersonnelPhoneExt : TStringField;
TablePersonnelSalary : TFloatField;
Constructors
Functions
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
Properties
Events
Variables
DBGrid1 : TDBGrid;
DBNavigator1 : TDBNavigator;
DSDept : TDataSource;
DSPersonnel : TDataSource;
Label1 : TLabel;
Label10 : TLabel;
Label11 : TLabel;
Label12 : TLabel;
Label13 : TLabel;
Label2 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
LookupDialog1 : TLookupDialog;
Panel1 : TPanel;
Panel2 : TPanel;
SelectDialog1 : TSelectDialog;
SelectDialog2 : TSelectDialog;
SelectDialog3 : TSelectDialog;
TabbedNotebook1 : TTabbedNotebook;
TableDept : TTable;
TableDeptDateEstablished : TDateField;
TableDeptDepartmentID : TStringField;
TableDeptDescription : TStringField;
TableDeptManagerID : TStringField;
TableDeptOperatingCost : TCurrencyField;
TableDeptOwnerDept : TStringField;
TableDeptStaffSize : TSmallintField;
TableDeptStaffTurnover : TFloatField;
TablePersonnel : TTable;
TablePersonnelBoss : TStringField;
TablePersonnelEmpNo : TStringField;
TablePersonnelFirstName : TStringField;
TablePersonnelHireDate : TDateTimeField;
TablePersonnelLastName : TStringField;
TablePersonnelPhoneExt : TStringField;
TablePersonnelSalary : TFloatField;