datafrm.pas
来自「本人编写的有关军队营房工作的管理系统」· PAS 代码 · 共 873 行 · 第 1/3 页
PAS
873 行
Dyfwz: TDataSource;
dt: TTable;
dtBDEDesigner: TIntegerField;
dtBDEDesigner2: TStringField;
dtBDEDesigner3: TStringField;
dtBDEDesigner4: TStringField;
dtBDEDesigner5: TStringField;
dtBDEDesigner6: TStringField;
dtBDEDesigner7: TStringField;
dtBDEDesigner8: TStringField;
dtBDEDesigner9: TStringField;
dtBDEDesigner10: TStringField;
dtBDEDesigner11: TStringField;
dtBDEDesigner12: TSmallintField;
dtBDEDesigner13: TFloatField;
dtBDEDesigner14: TSmallintField;
dtBDEDesigner15: TStringField;
dtBDEDesigner16: TSmallintField;
dtBDEDesigner17: TStringField;
Ddt: TDataSource;
wx: TTable;
wxBDEDesigner: TStringField;
wxBDEDesigner2: TStringField;
wxBDEDesigner3: TStringField;
wxBDEDesigner4: TStringField;
wxBDEDesigner5: TDateField;
wxBDEDesigner6: TStringField;
wxBDEDesigner7: TStringField;
wxBDEDesigner8: TCurrencyField;
wxwz: TTable;
wxwzBDEDesigner: TStringField;
wxwzBDEDesigner2: TStringField;
wxwzBDEDesigner3: TStringField;
wxwzBDEDesigner4: TStringField;
wxwzBDEDesigner5: TFloatField;
wxwzBDEDesigner6: TCurrencyField;
wxwzBDEDesigner7: TCurrencyField;
Dwx: TDataSource;
Dwxwz: TDataSource;
Qwx: TQuery;
Qwxwz: TQuery;
wxwz1: TTable;
Dwxwz1: TDataSource;
wxwz1BDEDesigner: TStringField;
wxwz1BDEDesigner2: TStringField;
wxwz1BDEDesigner3: TStringField;
wxwz1BDEDesigner4: TFloatField;
wxwz1BDEDesigner5: TCurrencyField;
wxwz1BDEDesigner6: TCurrencyField;
dwqk1: TTable;
dwqk1BDEDesigner: TStringField;
dwqk1BDEDesigner2: TStringField;
dwqk1BDEDesigner3: TStringField;
dwqk1BDEDesigner4: TStringField;
dwqk1BDEDesigner5: TStringField;
dwqk1BDEDesigner6: TStringField;
dwqk1BDEDesigner7: TStringField;
dwqk1BDEDesigner8: TStringField;
dwqk1BDEDesigner9: TStringField;
dwqk1BDEDesigner10: TStringField;
dwqk1BDEDesigner11: TIntegerField;
dwqk1BDEDesigner12: TIntegerField;
dwqk1BDEDesigner13: TStringField;
dwqk1BDEDesigner14: TStringField;
dwqk1BDEDesigner15: TStringField;
dwqk1BDEDesigner16: TStringField;
dwqk1BDEDesigner17: TIntegerField;
dwqk1BDEDesigner18: TIntegerField;
dwqk1BDEDesigner19: TIntegerField;
dwqk1BDEDesigner20: TIntegerField;
dwqk1BDEDesigner21: TIntegerField;
dwqk1BDEDesigner22: TIntegerField;
dwqk1BDEDesigner23: TIntegerField;
dwqk1BDEDesigner24: TIntegerField;
dwqk1BDEDesigner25: TIntegerField;
dwqk1BDEDesigner26: TIntegerField;
dwqk1BDEDesigner27: TIntegerField;
dwqk1BDEDesigner28: TIntegerField;
dwqk1BDEDesigner29: TIntegerField;
dwqk1BDEDesigner30: TIntegerField;
dwqk1BDEDesigner31: TIntegerField;
guolu1: TTable;
guolu1BDEDesigner: TIntegerField;
guolu1BDEDesigner2: TStringField;
guolu1BDEDesigner3: TStringField;
guolu1BDEDesigner4: TStringField;
guolu1BDEDesigner5: TStringField;
guolu1BDEDesigner6: TStringField;
guolu1BDEDesigner7: TFloatField;
guolu1BDEDesigner8: TFloatField;
guolu1BDEDesigner9: TFloatField;
guolu1BDEDesigner10: TSmallintField;
guolu1BDEDesigner11: TStringField;
guolu1BDEDesigner12: TStringField;
guolu1BDEDesigner13: TStringField;
guolu1BDEDesigner14: TStringField;
guolu1BDEDesigner15: TStringField;
guolu1BDEDesigner16: TStringField;
guolu1BDEDesigner17: TStringField;
guolu1BDEDesigner18: TSmallintField;
guolu1BDEDesigner19: TStringField;
guolu1BDEDesigner20: TStringField;
guolu1BDEDesigner21: TStringField;
gx1: TTable;
gx1BDEDesigner: TIntegerField;
gx1BDEDesigner2: TStringField;
gx1BDEDesigner3: TStringField;
gx1BDEDesigner4: TStringField;
gx1BDEDesigner5: TStringField;
gx1BDEDesigner6: TStringField;
gx1BDEDesigner7: TIntegerField;
gx1BDEDesigner8: TSmallintField;
gx1BDEDesigner9: TStringField;
gx1BDEDesigner10: TSmallintField;
gx1BDEDesigner11: TStringField;
gx1BDEDesigner12: TStringField;
gx1BDEDesigner13: TStringField;
gx1BDEDesigner14: TStringField;
xjyf1: TTable;
xjyf1BDEDesigner: TIntegerField;
xjyf1BDEDesigner2: TStringField;
xjyf1BDEDesigner3: TStringField;
xjyf1BDEDesigner4: TStringField;
xjyf1BDEDesigner5: TStringField;
xjyf1BDEDesigner6: TStringField;
xjyf1BDEDesigner7: TIntegerField;
xjyf1BDEDesigner8: TIntegerField;
xjyf1BDEDesigner9: TIntegerField;
xjyf1BDEDesigner10: TStringField;
xjyf1BDEDesigner11: TSmallintField;
xjyf1BDEDesigner12: TStringField;
xjyf1BDEDesigner13: TCurrencyField;
xjyf1BDEDesigner14: TCurrencyField;
xjyf1BDEDesigner15: TCurrencyField;
xjyf1BDEDesigner16: TCurrencyField;
xjyf1BDEDesigner17: TCurrencyField;
xjyf1BDEDesigner18: TStringField;
xjyf1BDEDesigner19: TStringField;
xjyf1BDEDesigner20: TStringField;
yfda1: TTable;
yfda1BDEDesigner: TIntegerField;
yfda1BDEDesigner2: TStringField;
yfda1BDEDesigner3: TStringField;
yfda1BDEDesigner4: TStringField;
yfda1BDEDesigner5: TStringField;
yfda1BDEDesigner6: TStringField;
yfda1BDEDesigner7: TSmallintField;
yfda1BDEDesigner8: TSmallintField;
yfda1BDEDesigner9: TStringField;
yffd1: TTable;
yffd1BDEDesigner: TIntegerField;
yffd1BDEDesigner2: TStringField;
yffd1BDEDesigner3: TStringField;
yffd1BDEDesigner4: TStringField;
yffd1BDEDesigner5: TStringField;
yffd1BDEDesigner6: TIntegerField;
yffd1BDEDesigner7: TStringField;
yffd1BDEDesigner8: TStringField;
yffd1BDEDesigner9: TIntegerField;
yffd1BDEDesigner10: TStringField;
yffd1BDEDesigner11: TStringField;
yffd1BDEDesigner12: TIntegerField;
yffd1BDEDesigner13: TIntegerField;
yffd1BDEDesigner14: TIntegerField;
yffd1BDEDesigner15: TIntegerField;
yffd1BDEDesigner16: TIntegerField;
yffd1BDEDesigner17: TIntegerField;
yffd1BDEDesigner18: TStringField;
yffd1BDEDesigner19: TStringField;
yffd1BDEDesigner20: TStringField;
yffd1BDEDesigner21: TStringField;
yffd1BDEDesigner22: TStringField;
yffd1BDEDesigner23: TStringField;
yffd1BDEDesigner24: TSmallintField;
yffd1BDEDesigner25: TIntegerField;
yffd1BDEDesigner26: TStringField;
yffd1BDEDesigner27: TStringField;
yffd1BDEDesigner28: TStringField;
yffd1BDEDesigner29: TStringField;
yffd1BDEDesigner30: TStringField;
yffd1BDEDesigner31: TStringField;
yffd1BDEDesigner32: TStringField;
yffd1BDEDesigner33: TStringField;
yfsb1: TTable;
yfsb1BDEDesigner: TSmallintField;
yfsb1BDEDesigner2: TStringField;
yfsb1BDEDesigner3: TStringField;
yfsb1BDEDesigner4: TStringField;
yfsb1BDEDesigner5: TSmallintField;
yfsb1BDEDesigner6: TSmallintField;
yfsb1BDEDesigner7: TIntegerField;
yfsb1BDEDesigner8: TSmallintField;
yfsb1BDEDesigner9: TIntegerField;
yfsb1BDEDesigner10: TSmallintField;
yfsb1BDEDesigner11: TIntegerField;
yfsb1BDEDesigner12: TSmallintField;
yfsb1BDEDesigner13: TSmallintField;
yfsb1BDEDesigner14: TIntegerField;
yfsb1BDEDesigner15: TSmallintField;
yfsb1BDEDesigner16: TIntegerField;
yfsb1BDEDesigner17: TSmallintField;
yfsb1BDEDesigner18: TSmallintField;
yfsb1BDEDesigner19: TSmallintField;
yfsb1BDEDesigner20: TSmallintField;
yfsb1BDEDesigner21: TIntegerField;
yfsb1BDEDesigner22: TSmallintField;
yfsb1BDEDesigner23: TIntegerField;
yfsb1BDEDesigner24: TIntegerField;
yfsb1BDEDesigner25: TIntegerField;
yfsb1BDEDesigner26: TIntegerField;
yfsb1BDEDesigner27: TIntegerField;
yfsb1BDEDesigner28: TIntegerField;
yfsb1BDEDesigner1: TIntegerField;
yfsb1BDEDesigner110: TIntegerField;
yfsb1BDEDesigner29: TIntegerField;
yfwz1: TTable;
yfwz1BDEDesigner: TIntegerField;
yfwz1BDEDesigner2: TStringField;
yfwz1BDEDesigner3: TStringField;
yfwz1BDEDesigner4: TStringField;
yfwz1BDEDesigner5: TStringField;
yfwz1BDEDesigner6: TStringField;
yfwz1BDEDesigner7: TIntegerField;
yfwz1BDEDesigner8: TIntegerField;
yfwz1BDEDesigner9: TIntegerField;
yfwz1BDEDesigner10: TIntegerField;
yfwz1BDEDesigner11: TIntegerField;
yfwz1BDEDesigner12: TStringField;
yfzl1: TTable;
yfzl1BDEDesigner: TSmallintField;
yfzl1BDEDesigner2: TStringField;
yfzl1BDEDesigner3: TStringField;
yfzl1BDEDesigner4: TStringField;
yfzl1BDEDesigner5: TStringField;
yfzl1BDEDesigner6: TStringField;
yfzl1BDEDesigner7: TStringField;
yfzl1BDEDesigner8: TStringField;
yfzl1BDEDesigner9: TDateField;
yfzl1BDEDesigner10: TIntegerField;
yfzl1BDEDesigner11: TIntegerField;
yfzl1BDEDesigner12: TIntegerField;
yfzl1BDEDesigner13: TIntegerField;
yfzl1BDEDesigner14: TIntegerField;
yfzl1BDEDesigner15: TIntegerField;
yfzl1BDEDesigner16: TIntegerField;
yfzl1BDEDesigner1: TIntegerField;
yfzl1BDEDesigner17: TIntegerField;
yfzl1BDEDesigner18: TIntegerField;
yfzl1BDEDesigner19: TStringField;
yfzl1BDEDesigner20: TStringField;
yfzl1BDEDesigner21: TStringField;
yfzl1BDEDesigner22: TStringField;
yfzl1BDEDesigner23: TStringField;
yfzl1BDEDesigner24: TStringField;
yfzl1BDEDesigner25: TStringField;
yfzl1BDEDesigner26: TStringField;
yfzl1BDEDesigner27: TStringField;
yfzl1BDEDesigner28: TStringField;
dt1: TTable;
dt1BDEDesigner: TIntegerField;
dt1BDEDesigner2: TStringField;
dt1BDEDesigner3: TStringField;
dt1BDEDesigner4: TStringField;
dt1BDEDesigner5: TStringField;
dt1BDEDesigner6: TStringField;
dt1BDEDesigner7: TStringField;
dt1BDEDesigner8: TStringField;
dt1BDEDesigner9: TStringField;
dt1BDEDesigner10: TStringField;
dt1BDEDesigner11: TStringField;
dt1BDEDesigner12: TSmallintField;
dt1BDEDesigner13: TFloatField;
dt1BDEDesigner14: TSmallintField;
dt1BDEDesigner15: TStringField;
dt1BDEDesigner16: TSmallintField;
dt1BDEDesigner17: TStringField;
private
{ Private declarations }
public
{ Public declarations }
end;
var
yfgldata: Tyfgldata;
implementation
{$R *.dfm}
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?