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

Delphi控件源码

开发平台:

Delphi

  1. unit MastdetF;
  2. interface
  3. uses
  4.   SysUtils, Windows, Messages, Classes, Graphics, Controls,
  5.   StdCtrls, Forms, DBCtrls, DB, DBGrids, DBTables, Grids, Mask, ExtCtrls;
  6. type
  7.   TForm2 = class(TForm)
  8.     ScrollBox: TScrollBox;
  9.     Label1: TLabel;
  10.     EditCompany: TDBEdit;
  11.     Label2: TLabel;
  12.     EditAddr: TDBEdit;
  13.     Label3: TLabel;
  14.     EditAddr2: TDBEdit;
  15.     Label4: TLabel;
  16.     EditCity: TDBEdit;
  17.     Label5: TLabel;
  18.     EditState: TDBEdit;
  19.     Label6: TLabel;
  20.     EditZip: TDBEdit;
  21.     Label7: TLabel;
  22.     EditCountry: TDBEdit;
  23.     Label8: TLabel;
  24.     EditPhone: TDBEdit;
  25.     Label9: TLabel;
  26.     EditFAX: TDBEdit;
  27.     DBGrid1: TDBGrid;
  28.     DBNavigator: TDBNavigator;
  29.     Panel1: TPanel;
  30.     Panel2: TPanel;
  31.     Panel3: TPanel;
  32.   private
  33.     { private declarations }
  34.   public
  35.     { public declarations }
  36.   end;
  37. var
  38.   Form2: TForm2;
  39. implementation
  40. uses MdData;
  41. {$R *.DFM}
  42. end.