FirstADOExampleU1.pas
上传用户:fh681027
上传日期:2022-07-23
资源大小:1959k
文件大小:0k
源码类别:

Delphi控件源码

开发平台:

Delphi

  1. unit FirstADOExampleU1;
  2. interface
  3. uses
  4.   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  5.   Dialogs, Grids, DBGrids, DB, ADODB;
  6. type
  7.   TForm1 = class(TForm)
  8.     ADOTable1: TADOTable;
  9.     DataSource1: TDataSource;
  10.     DBGrid1: TDBGrid;
  11.   private
  12.     { Private declarations }
  13.   public
  14.     { Public declarations }
  15.   end;
  16. var
  17.   Form1: TForm1;
  18. implementation
  19. {$R *.dfm}
  20. end.