edtarchivesunit.~pas

来自「工商收费系统,主要是管理非税收收入的费用的管理」· ~PAS 代码 · 共 57 行

unit EdtArchivesUnit;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ConEdtUnit, Mask, DBCtrls, StdCtrls, DB, ADODB, ExtCtrls,
  dxCntner, dxExEdtr, dxEdLib, Buttons, ToolWin, ComCtrls;

type
  TArchivesEdtFrm = class(TConEdtFrm)
    lblBismanName: TLabel;
    dbedtName: TDBEdit;
    lblDateYjrq: TLabel;
    dbedtManager: TDBEdit;
    lbl4: TLabel;
    dbedtPhone: TDBEdit;
    lbl5: TLabel;
    dbedtMemo: TDBEdit;
    lblBiamanId: TLabel;
    DBEdit1: TDBEdit;
    DBEdit2: TDBEdit;
    DBEdit3: TDBEdit;
    DBEdit4: TDBEdit;
    DBEdit8: TDBEdit;
    lblManager: TLabel;
    lblManagerID: TLabel;
    Label3: TLabel;
    lblYYFW: TLabel;
    lblFeeItem1: TLabel;
    lblFeeItem2: TLabel;
    lblFeeItem3: TLabel;
    Label8: TLabel;
    lblAddress: TLabel;
    DBEdit9: TDBEdit;
    lblCancelBiz: TLabel;
    DBLookupComboBox1: TDBLookupComboBox;
    DBLookupComboBox2: TDBLookupComboBox;
    DBLookupComboBox3: TDBLookupComboBox;
    DataSource1: TDataSource;
    ADODataSet1: TADODataSet;
    ADOConnection1: TADOConnection;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  ArchivesEdtFrm: TArchivesEdtFrm;

implementation

{$R *.dfm}

end.