开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Delphi控件源码 > 查看源码
IbEmpF.pas
资源名称：delphi.rar　[点击查看]
上传用户：fh681027
上传日期：2022-07-23
资源大小：1959k
文件大小：1k
源码类别：

Delphi控件源码

开发平台：

Delphi

IbEmpF.pas：源码内容
  1. unit IbEmpF;
  3. interface
  5. uses
  6.   SysUtils, Windows, Messages, Classes, Graphics, Controls,
  7.   StdCtrls, Forms, DBCtrls, DB, DBTables, Mask, ExtCtrls;
  9. type
  10.   TFormEmp = class(TForm)
  11.     DBNavigator: TDBNavigator;
  12.     Panel1: TPanel;
  13.     DataSource1: TDataSource;
  14.     Panel2: TPanel;
  15.     Query1: TQuery;
  16.     ScrollBox: TScrollBox;
  17.     Label1: TLabel;
  18.     Label2: TLabel;
  19.     Label3: TLabel;
  20.     Label4: TLabel;
  21.     Label5: TLabel;
  22.     Label6: TLabel;
  23.     Label7: TLabel;
  24.     Label8: TLabel;
  25.     Label9: TLabel;
  26.     Label10: TLabel;
  27.     Label11: TLabel;
  28.     DBEdit1: TDBEdit;
  29.     DBEdit2: TDBEdit;
  30.     DBEdit3: TDBEdit;
  31.     DBEdit4: TDBEdit;
  32.     DBEdit5: TDBEdit;
  33.     DBEdit6: TDBEdit;
  34.     DBEdit7: TDBEdit;
  35.     DBEdit8: TDBEdit;
  36.     DBEdit9: TDBEdit;
  37.     DBEdit10: TDBEdit;
  38.     DBEdit11: TDBEdit;
  39.     procedure FormCreate(Sender: TObject);
  40.   private
  41.     { private declarations }
  42.   public
  43.     { public declarations }
  44.   end;
  46. var
  47.   FormEmp: TFormEmp;
  49. implementation
  51. {$R *.DFM}
  53. procedure TFormEmp.FormCreate(Sender: TObject);
  54. begin
  55.   Query1.Open;
  56. end;
  58. end.