| Class TDicForm (unit Dics) |
TForm
| Constructors |
| Functions |
procedure BitBtn1Click(Sender: TObject);
procedure PageControl1Change(Sender: TObject);
function GetCurDataSource: TDataSource;
function GetCurQuery: TQuery;
function GetIndex: Integer;
function GetQueryByIndex(Idx: integer): TQuery;| Properties |
property CurDataSource : TDataSource
property CurIndex : Integer
property CurQuery : TQuery| Events |
| Variables |
AutoEdit1 : TAutoEdit;
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
BitBtn3 : TBitBtn;
BitBtn4 : TBitBtn;
DataSource1 : TDataSource;
DataSource2 : TDataSource;
PageControl1 : TPageControl;
Panel1 : TPanel;
PtFormLink1 : TPtFormLink;
Query1 : TQuery;
Query1Da_Auto_ID : TSmallintField;
Query1Da_Auto_Name : TStringField;
Query2 : TQuery;
Query2Dd_Dr_ID : TSmallintField;
Query2Dd_Dr_Name : TStringField;
SearchDBGrid1 : TSearchDBGrid;
SearchDBGrid2 : TSearchDBGrid;
TabSheet1 : TTabSheet;
TabSheet2 : TTabSheet;| Constructors |
| Functions |
procedure BitBtn1Click(Sender: TObject);
procedure PageControl1Change(Sender: TObject);
function GetCurDataSource: TDataSource;
function GetCurQuery: TQuery;
function GetIndex: Integer;
function GetQueryByIndex(Idx: integer): TQuery;| Properties |
property CurDataSource : TDataSource
property CurIndex : Integer
property CurQuery : TQuery| Events |
| Variables |
AutoEdit1 : TAutoEdit;
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
BitBtn3 : TBitBtn;
BitBtn4 : TBitBtn;
DataSource1 : TDataSource;
DataSource2 : TDataSource;
PageControl1 : TPageControl;
Panel1 : TPanel;
PtFormLink1 : TPtFormLink;
Query1 : TQuery;
Query1Da_Auto_ID : TSmallintField;
Query1Da_Auto_Name : TStringField;
Query2 : TQuery;
Query2Dd_Dr_ID : TSmallintField;
Query2Dd_Dr_Name : TStringField;
SearchDBGrid1 : TSearchDBGrid;
SearchDBGrid2 : TSearchDBGrid;
TabSheet1 : TTabSheet;
TabSheet2 : TTabSheet;