?? datamz1.~pas
字號(hào):
unit datamz1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, ADODB;
type
TDataMzf1 = class(TDataModule)
XyMzQuitQuery: TADOQuery;
XyMzXmQuitQuery: TADOQuery;
XyMzQuitSource: TDataSource;
XyMzXmQuitSource: TDataSource;
XyMzQuitQuery1: TADOQuery;
XyReSource: TDataSource;
XyMzLossQuery: TADOQuery;
XyMzLossSource: TDataSource;
XyMzLossQuery1: TADOQuery;
LossValiQuery: TADOQuery;
LossValiSource: TDataSource;
XyKcReQuery: TADOQuery;
XyNightQuery: TADOQuery;
XyNightSource: TDataSource;
XySeleQuery1: TADOQuery;
XySeleSource1: TDataSource;
XyDayQuery: TADOQuery;
XyDaySource: TDataSource;
XyKcWhSource: TDataSource;
DayNightQuery: TADOQuery;
DayNightSource: TDataSource;
XyMzInHzSource: TDataSource;
XyMzInQuery: TADOQuery;
XyMzInSource: TDataSource;
RecipeXmSource: TDataSource;
RecipeQuery: TADOQuery;
RecipeSource: TDataSource;
RecipeHzSource: TDataSource;
LifeOmenSource: TDataSource;
LifeOmenQuery: TADOQuery;
KcOmenSource: TDataSource;
KcOmenQuery: TADOQuery;
SwitchQuery: TADOQuery;
XyReQuery: TADOStoredProc;
XyKcWhQuery: TADOStoredProc;
XyMzInHzQuery: TADOStoredProc;
XyMzInHzQueryypid: TSmallintField;
XyMzInHzQueryypname: TStringField;
XyMzInHzQueryypspec: TStringField;
XyMzInHzQueryypunit: TStringField;
XyMzInHzQueryinamou: TIntegerField;
XyMzInHzQueryinmoney: TBCDField;
RecipeXmQuery: TADOStoredProc;
RecipeHzQuery: TADOStoredProc;
RecipeHzQueryyp_id: TSmallintField;
RecipeHzQueryyp_name: TStringField;
RecipeHzQueryyp_spec: TStringField;
RecipeHzQueryyp_unit: TStringField;
RecipeHzQuerymoney: TBCDField;
RecipeHzQueryamou: TIntegerField;
RecipeYpQuery: TADOQuery;
RecipeYpSource: TDataSource;
XyMzLsConnection: TADOConnection;
XyMzLsUser: TADOQuery;
XyMzLsUserSource: TDataSource;
LossValiQuerymy_id: TAutoIncField;
LossValiQueryyp_name: TStringField;
LossValiQueryyp_spec: TStringField;
LossValiQueryyp_unit: TStringField;
LossValiQueryyp_batch: TStringField;
LossValiQueryls_price: TBCDField;
LossValiQueryloss_amou: TIntegerField;
LossValiQueryloss_date: TDateTimeField;
LossValiQuerycz_man: TStringField;
LossValiQueryqr_man: TStringField;
LossValiQueryloss_reas: TStringField;
XyMzInQuerymy_id: TAutoIncField;
XyMzInQueryyp_batch: TStringField;
XyMzInQuerysc_fact: TStringField;
XyMzInQueryls_price: TBCDField;
XyMzInQueryin_amou: TIntegerField;
XyMzInQueryin_date: TDateTimeField;
XyMzInQueryqr_date: TDateTimeField;
XyMzInQueryin_man: TStringField;
XyMzInQueryqr_man: TStringField;
XyMzInQueryout_man: TStringField;
RecipeXmQueryhzname: TStringField;
RecipeXmQueryhj_id: TIntegerField;
RecipeXmQuerysr_man: TStringField;
RecipeXmQueryysmoney: TBCDField;
RecipeXmQueryva_man: TStringField;
RecipeXmQueryva_iden: TWordField;
RecipeQuerymy_id: TAutoIncField;
RecipeQueryyp_name: TStringField;
RecipeQueryyp_spec: TStringField;
RecipeQueryyp_unit: TStringField;
RecipeQueryyp_batch: TStringField;
RecipeQuerysc_fact: TStringField;
RecipeQueryqr_date: TDateTimeField;
RecipeQueryls_price: TBCDField;
RecipeQueryyp_amou: TIntegerField;
LifeOmenQueryin_id: TIntegerField;
LifeOmenQueryyp_life: TDateTimeField;
LifeOmenQueryyp_name: TStringField;
LifeOmenQueryyp_spec: TStringField;
LifeOmenQueryyp_unit: TStringField;
LifeOmenQuerysc_fact: TStringField;
LifeOmenQueryls_price: TBCDField;
LifeOmenQuerymz_amou: TIntegerField;
RecipeYpQuerymy_id: TAutoIncField;
RecipeYpQueryyp_batch: TStringField;
RecipeYpQuerysc_fact: TStringField;
RecipeYpQueryqr_date: TDateTimeField;
RecipeYpQueryls_price: TBCDField;
RecipeYpQueryyp_amou: TIntegerField;
RecipeYpQueryhj_id: TIntegerField;
RecipeYpQueryqr_man: TStringField;
UserSource: TDataSource;
UserQuery: TADOQuery;
XyKcWhQueryin_id: TIntegerField;
XyKcWhQueryyp_id: TSmallintField;
XyKcWhQueryyp_name: TStringField;
XyKcWhQueryyp_spec: TStringField;
XyKcWhQueryyp_unit: TStringField;
XyKcWhQueryyp_batch: TStringField;
XyKcWhQuerysc_fact: TStringField;
XyKcWhQuerymz_amou: TIntegerField;
XyKcWhQueryls_price: TBCDField;
XyKcWhQueryday_iden: TBooleanField;
XyKcWhQueryfirstday_iden: TBooleanField;
XyKcWhQuerymz_tank: TIntegerField;
YpQuery2: TADOStoredProc;
StringField4: TStringField;
StringField8: TStringField;
StringField9: TStringField;
SmallintField1: TSmallintField;
YpSource2: TDataSource;
KcPrin: TADOStoredProc;
XyZyInQuery: TADOStoredProc;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataMzf1: TDataMzf1;
implementation
{$R *.DFM}
uses datamz;
end.
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -