am_wjgl_bjs.~pas
上传用户:szruida
上传日期:2007-06-01
资源大小:6518k
文件大小:1k
源码类别:

Delphi控件源码

开发平台:

Delphi

  1. unit Am_wjgl_bjs;
  2. interface
  3. uses
  4.   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  5.   Dialogs, StdCtrls, Buttons, DBCtrlsEh, DBLookupEh, DBCtrls, Mask,
  6.   ExtCtrls;
  7. type
  8.   TAm_wjgl_bj = class(TForm)
  9.     Panel1: TPanel;
  10.     Label1: TLabel;
  11.     Label2: TLabel;
  12.     Label4: TLabel;
  13.     Label6: TLabel;
  14.     Label7: TLabel;
  15.     Label8: TLabel;
  16.     Label9: TLabel;
  17.     Label10: TLabel;
  18.     Label11: TLabel;
  19.     Label12: TLabel;
  20.     Label13: TLabel;
  21.     Label14: TLabel;
  22.     Label15: TLabel;
  23.     Label16: TLabel;
  24.     Label17: TLabel;
  25.     Label18: TLabel;
  26.     Label19: TLabel;
  27.     Label20: TLabel;
  28.     Label3: TLabel;
  29.     SpeedButton1: TSpeedButton;
  30.     Label5: TLabel;
  31.     DBEdit1: TDBEdit;
  32.     DBEdit4: TDBEdit;
  33.     DBEdit6: TDBEdit;
  34.     DBEdit7: TDBEdit;
  35.     DBEdit8: TDBEdit;
  36.     DBEdit9: TDBEdit;
  37.     DBEdit14: TDBEdit;
  38.     DBEdit15: TDBEdit;
  39.     DBEdit18: TDBEdit;
  40.     DBEdit19: TDBEdit;
  41.     DBEdit20: TDBEdit;
  42.     DBMemo1: TDBMemo;
  43.     DBMemo3: TDBMemo;
  44.     DBEditEh1: TDBEditEh;
  45.     DBLookupComboboxEh1: TDBLookupComboboxEh;
  46.     DBLookupComboboxEh2: TDBLookupComboboxEh;
  47.     DBDateTimeEditEh1: TDBDateTimeEditEh;
  48.     DBDateTimeEditEh2: TDBDateTimeEditEh;
  49.     DBEditEh2: TDBEditEh;
  50.     Panel2: TPanel;
  51.     Quit: TBitBtn;
  52.     Add: TBitBtn;
  53.     DbMemo2: TDBMemo;
  54.   private
  55.     { Private declarations }
  56.   public
  57.     { Public declarations }
  58.   end;
  59. var
  60.   Am_wjgl_bj: TAm_wjgl_bj;
  61. implementation
  62. uses dms,u_Public,mainfrms;
  63. {$R *.dfm}
  64. end.