unit2.pas.~1~
来自「delphi2007开发的汽车配件进销存系统.实用级的源码.」· ~1~ 代码 · 共 36 行
~1~
36 行
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, StdCtrls, GridsEh, DBGridEh, cxControls, cxContainer,
cxEdit, cxGroupBox;
type
TForm1 = class(TForm)
cxGroupBox1: TcxGroupBox;
DBGridEh1: TDBGridEh;
edt1: TEdit;
cxGroupBox2: TcxGroupBox;
DBGridEh2: TDBGridEh;
con1: TADOConnection;
qry1: TADOQuery;
qry2: TADOQuery;
ds1: TDataSource;
ds2: TDataSource;
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?