📄 datamodule.pas
字号:
unit datamodule;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, DBTables;
type
TDataModule1 = class(TDataModule)
rsbm: TTable;
whzd: TTable;
mzsz: TTable;
zcsz: TTable;
zwsz: TTable;
gn: TTable;
yggb: TQuery;
rsbms: TQuery;
whzds: TQuery;
mzszs: TQuery;
zcszs: TQuery;
zwszs: TQuery;
yggbb: TTable;
ggjs: TTable;
gzgn: TTable;
ggjss: TQuery;
gzgns: TQuery;
gpgz: TTable;
gpgzs: TQuery;
gpgzu: TUpdateSQL;
qqsd: TTable;
qqdj: TTable;
qqdjs: TQuery;
qqdju: TUpdateSQL;
qjdj: TTable;
qjdjs: TQuery;
npdj: TTable;
yjb: TTable;
yjsd: TTable;
htgn: TTable;
yjbs: TQuery;
yjbu: TUpdateSQL;
htgns: TQuery;
gns: TQuery;
ggjsn: TTable;
gzgnn: TTable;
gzgnss: TQuery;
gztj: TTable;
gzgnu: TUpdateSQL;
htgnu: TUpdateSQL;
gztjs: TQuery;
gztju: TUpdateSQL;
npdjs: TQuery;
npdju: TUpdateSQL;
yggbu: TUpdateSQL;
rsbmss: TQuery;
passs: TQuery;
passu: TUpdateSQL;
user: TQuery;
useru: TUpdateSQL;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataModule1: TDataModule1;
implementation
{$R *.DFM}
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -