datamoduleunit.pas
来自「软件简介:(贸易管理系统Delphi源代码(有开发文档) 采用access+de」· PAS 代码 · 共 40 行
PAS
40 行
unit datamoduleUnit;
interface
uses
SysUtils, Classes, DB, ADODB;
type
TDataModule2 = class(TDataModule)
DSinfind: TDataSource;
ADSinfind: TADODataSet;
ADSsalefind: TADODataSet;
DSsalefind: TDataSource;
DScustomerfind: TDataSource;
ADScustomerfind: TADODataSet;
ADODataSet1: TADODataSet;
DataSource1: TDataSource;
ADSgoods: TADODataSet;
DSgoods: TDataSource;
DScustomerms: TDataSource;
ADScustomerms: TADODataSet;
DSid: TDataSource;
ADSid: TADODataSet;
DSsupplyms: TDataSource;
ADSsupplyms: TADODataSet;
private
{ Private declarations }
public
{ Public declarations }
end;
var
DataModule2: TDataModule2;
implementation
{$R *.dfm}
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?