| Class TDBAwareForm (unit DbAware) |
TForm
| Constructors |
| Functions |
procedure CancelQueryClick(Sender: TObject);
procedure CheckBox1Click(Sender: TObject);
procedure CheckBox2Click(Sender: TObject);
procedure ComboBox2Change(Sender: TObject);
procedure DBFilter1Change(Sender: TObject);
procedure DBGrid1CheckButton(Sender: TObject; ACol: Longint;
Field: TField; var Enabled: Boolean);
procedure DBGrid1TitleBtnClick(Sender: TObject; ACol: Longint;
Field: TField);
procedure EnterQueryClick(Sender: TObject);
procedure ExecQueryClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure RadioGroup1Click(Sender: TObject);
procedure rxDBGrid1GetCellParams(Sender: TObject; Field: TField;
AFont: TFont; var Background: TColor; Highlight: Boolean);
procedure rxDBLookupCombo1Change(Sender: TObject);
procedure rxDBLookupCombo1GetImage(Sender: TObject; IsEmpty: Boolean;
var Graphic: TGraphic; var TextMargin: Integer);
procedure rxDBLookupCombo2Change(Sender: TObject);
procedure SetMacro(const MacroName, Value: string);| Properties |
| Events |
| Variables |
CancelQuery : TSpeedButton;
CheckBox1 : TCheckBox;
CheckBox2 : TCheckBox;
ComboBox2 : TComboBox;
DataSource1 : TDataSource;
DataSource2 : TDataSource;
DataSource3 : TDataSource;
DataSource4 : TDataSource;
DataSource5 : TDataSource;
DataSource6 : TDataSource;
DBFilter1 : TrxDBFilter;
DBGrid1 : TRxDBGrid;
DBIndexCombo1 : TDBIndexCombo;
DBNavigator : TDBNavigator;
DBNavigator1 : TDBNavigator;
DBStatusLabel1 : TDBStatusLabel;
DBStatusLabel2 : TDBStatusLabel;
Edit1 : TMaskEdit;
EditCity : TDBEdit;
EditCompany : TDBEdit;
EditCountry : TDBEdit;
EditCustNo : TDBEdit;
EditPhone : TDBEdit;
EditState : TDBEdit;
EditZip : TDBEdit;
EnterQuery : TSpeedButton;
ExecQuery : TSpeedButton;
FormStorage1 : TFormStorage;
GroupBox1 : TGroupBox;
GroupBox2 : TGroupBox;
GroupBox3 : TGroupBox;
GroupBox4 : TGroupBox;
GroupBox5 : TGroupBox;
GroupBox6 : TGroupBox;
GroupBox7 : TGroupBox;
GroupBox8 : TGroupBox;
Label1 : TLabel;
Label10 : TLabel;
Label11 : TLabel;
Label12 : TLabel;
Label13 : TLabel;
Label14 : TLabel;
Label15 : TLabel;
Label16 : TLabel;
Label17 : TLabel;
Label19 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Label9 : TLabel;
Panel1 : TPanel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
PicClip : TPicClip;
QBEQuery1 : TQBEQuery;
RadioGroup1 : TRadioGroup;
rxDBGrid1 : TrxDBGrid;
rxDBGrid2 : TrxDBGrid;
rxDBLookupCombo1 : TrxDBLookupCombo;
rxDBLookupCombo2 : TrxDBLookupCombo;
rxQuery1 : TrxQuery;
rxQuery1AmountPaid : TCurrencyField;
rxQuery1Company : TStringField;
rxQuery1CustNo : TFloatField;
rxQuery1EmpNo : TIntegerField;
rxQuery1Freight : TCurrencyField;
rxQuery1ItemsTotal : TCurrencyField;
rxQuery1LastName : TStringField;
rxQuery1OrderNo : TFloatField;
rxQuery1PaymentMethod : TStringField;
rxQuery1PO : TStringField;
rxQuery1SaleDate : TDateTimeField;
rxQuery1ShipDate : TDateTimeField;
rxQuery1ShipToAddr1 : TStringField;
rxQuery1ShipToAddr2 : TStringField;
rxQuery1ShipToCity : TStringField;
rxQuery1ShipToContact : TStringField;
rxQuery1ShipToCountry : TStringField;
rxQuery1ShipToPhone : TStringField;
rxQuery1ShipToState : TStringField;
rxQuery1ShipToZip : TStringField;
rxQuery1ShipVIA : TStringField;
rxQuery1TaxRate : TFloatField;
rxQuery1Terms : TStringField;
ScrollBox : TScrollBox;
TabbedNotebook1 : TTabbedNotebook;
Table1 : TTable;
Table1Discount : TFloatField;
Table1ItemNo : TFloatField;
Table1OrderNo : TFloatField;
Table1PartNo : TFloatField;
Table1Qty : TIntegerField;
Table2 : TTable;
Table2Category : TStringField;
Table2Common_Name : TStringField;
Table2Graphic : TGraphicField;
Table2Lengthcm : TFloatField;
Table2Notes : TMemoField;
Table2SpeciesNo : TFloatField;
Table3 : TTable;
Table4 : TTable;| Constructors |
| Functions |
procedure CancelQueryClick(Sender: TObject);
procedure CheckBox1Click(Sender: TObject);
procedure CheckBox2Click(Sender: TObject);
procedure ComboBox2Change(Sender: TObject);
procedure DBFilter1Change(Sender: TObject);
procedure DBGrid1CheckButton(Sender: TObject; ACol: Longint;
Field: TField; var Enabled: Boolean);
procedure DBGrid1TitleBtnClick(Sender: TObject; ACol: Longint;
Field: TField);
procedure EnterQueryClick(Sender: TObject);
procedure ExecQueryClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);Public declarations
procedure FormCreate(Sender: TObject);
procedure RadioGroup1Click(Sender: TObject);
procedure rxDBGrid1GetCellParams(Sender: TObject; Field: TField;
AFont: TFont; var Background: TColor; Highlight: Boolean);
procedure rxDBLookupCombo1Change(Sender: TObject);
procedure rxDBLookupCombo1GetImage(Sender: TObject; IsEmpty: Boolean;
var Graphic: TGraphic; var TextMargin: Integer);longest
procedure rxDBLookupCombo2Change(Sender: TObject);
procedure SetMacro(const MacroName, Value: string);Private declarations
| Properties |
| Events |
| Variables |
CancelQuery : TSpeedButton;
CheckBox1 : TCheckBox;
CheckBox2 : TCheckBox;
ComboBox2 : TComboBox;
DataSource1 : TDataSource;
DataSource2 : TDataSource;
DataSource3 : TDataSource;
DataSource4 : TDataSource;
DataSource5 : TDataSource;
DataSource6 : TDataSource;
DBFilter1 : TrxDBFilter;
DBGrid1 : TRxDBGrid;
DBIndexCombo1 : TDBIndexCombo;
DBNavigator : TDBNavigator;
DBNavigator1 : TDBNavigator;
DBStatusLabel1 : TDBStatusLabel;
DBStatusLabel2 : TDBStatusLabel;
Edit1 : TMaskEdit;
EditCity : TDBEdit;
EditCompany : TDBEdit;
EditCountry : TDBEdit;
EditCustNo : TDBEdit;
EditPhone : TDBEdit;
EditState : TDBEdit;
EditZip : TDBEdit;
EnterQuery : TSpeedButton;
ExecQuery : TSpeedButton;
FormStorage1 : TFormStorage;
GroupBox1 : TGroupBox;
GroupBox2 : TGroupBox;
GroupBox3 : TGroupBox;
GroupBox4 : TGroupBox;
GroupBox5 : TGroupBox;
GroupBox6 : TGroupBox;
GroupBox7 : TGroupBox;
GroupBox8 : TGroupBox;
Label1 : TLabel;
Label10 : TLabel;
Label11 : TLabel;
Label12 : TLabel;
Label13 : TLabel;
Label14 : TLabel;
Label15 : TLabel;
Label16 : TLabel;
Label17 : TLabel;
Label19 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Label5 : TLabel;
Label6 : TLabel;
Label7 : TLabel;
Label8 : TLabel;
Label9 : TLabel;
Panel1 : TPanel;
Panel2 : TPanel;
Panel3 : TPanel;
Panel4 : TPanel;
PicClip : TPicClip;
QBEQuery1 : TQBEQuery;
RadioGroup1 : TRadioGroup;
rxDBGrid1 : TrxDBGrid;
rxDBGrid2 : TrxDBGrid;
rxDBLookupCombo1 : TrxDBLookupCombo;
rxDBLookupCombo2 : TrxDBLookupCombo;
rxQuery1 : TrxQuery;
rxQuery1AmountPaid : TCurrencyField;
rxQuery1Company : TStringField;
rxQuery1CustNo : TFloatField;
rxQuery1EmpNo : TIntegerField;
rxQuery1Freight : TCurrencyField;
rxQuery1ItemsTotal : TCurrencyField;
rxQuery1LastName : TStringField;
rxQuery1OrderNo : TFloatField;
rxQuery1PaymentMethod : TStringField;
rxQuery1PO : TStringField;
rxQuery1SaleDate : TDateTimeField;
rxQuery1ShipDate : TDateTimeField;
rxQuery1ShipToAddr1 : TStringField;
rxQuery1ShipToAddr2 : TStringField;
rxQuery1ShipToCity : TStringField;
rxQuery1ShipToContact : TStringField;
rxQuery1ShipToCountry : TStringField;
rxQuery1ShipToPhone : TStringField;
rxQuery1ShipToState : TStringField;
rxQuery1ShipToZip : TStringField;
rxQuery1ShipVIA : TStringField;
rxQuery1TaxRate : TFloatField;
rxQuery1Terms : TStringField;
ScrollBox : TScrollBox;
TabbedNotebook1 : TTabbedNotebook;
Table1 : TTable;
Table1Discount : TFloatField;
Table1ItemNo : TFloatField;
Table1OrderNo : TFloatField;
Table1PartNo : TFloatField;
Table1Qty : TIntegerField;
Table2 : TTable;
Table2Category : TStringField;
Table2Common_Name : TStringField;
Table2Graphic : TGraphicField;
Table2Lengthcm : TFloatField;
Table2Notes : TMemoField;
Table2SpeciesNo : TFloatField;
Table3 : TTable;
Table4 : TTable;