?? unit2.pas
字號:
unit Unit2;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDM1 = class(TDataModule)
ADOQ1: TADOQuery;
ADOC1: TADOConnection;
DS1: TDataSource;
ADOCommand1: TADOCommand;
ADOQ1DSDesigner2: TWideStringField;
ADOQ1DSDesigner3: TWideStringField;
ADOQ1DSDesigner4: TWideStringField;
ADOQ1DSDesigner5: TWideStringField;
ADOQ1DSDesigner6: TWideStringField;
ADOQ1DSDesigner7: TWideStringField;
ADOQ1DSDesigner8: TWideStringField;
ADOQ1requirement: TWideStringField;
ADOQ1receipts: TWideStringField;
ADOQ1orders: TWideStringField;
ADOQ1available: TWideStringField;
ADOQ1shortages: TWideStringField;
ADOQ2: TADOQuery;
DS2: TDataSource;
ADOQ2DSDesigner2: TWideStringField;
ADOQ2DSDesigner3: TWideStringField;
ADOQ2DSDesigner4: TWideStringField;
ADOQ2DSDesigner5: TWideStringField;
ADOQ2DSDesigner6: TWideStringField;
ADOQ2DSDesigner7: TWideStringField;
ADOQ2DSDesigner8: TWideStringField;
ADOQ2requirement: TWideStringField;
ADOQ2receipts: TWideStringField;
ADOQ2orders: TWideStringField;
ADOQ2available: TWideStringField;
ADOQ2shortages: TWideStringField;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DM1: TDM1;
implementation
{$R *.dfm}
end.
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -