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

Delphi控件源码

开发平台:

Delphi

  1. unit FieldLookupF;
  2. interface
  3. uses
  4.   SysUtils, Windows, Messages, Classes, Graphics, Controls,
  5.   StdCtrls, Forms, DBCtrls, DB, DBGrids, DBTables, Grids, Mask, ExtCtrls;
  6. type
  7.   TFormFieldLookup = class(TForm)
  8.     DBGrid1: TDBGrid;
  9.     DBNavigator: TDBNavigator;
  10.     Panel1: TPanel;
  11.     Panel3: TPanel;
  12.   private
  13.     { private declarations }
  14.   public
  15.     { public declarations }
  16.   end;
  17. var
  18.   FormFieldLookup: TFormFieldLookup;
  19. implementation
  20. uses FLookupDm;
  21. {$R *.DFM}
  22. end.