ap_enter_nopayinvoice_d.dfm

一个MRPII系统源代码版本

inherited Frm_Ap_Enter_NoPayInvoice_D: TFrm_Ap_Enter_NoPayInvoice_D
  Left = 209
  Top = 148
  Caption = '未核销采购发票'
  ClientHeight = 244
  ClientWidth = 463
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel [0]
    Left = 62
    Top = 24
    Width = 48
    Height = 12
    Caption = '发票号：'
  end
  object Label2: TLabel [1]
    Left = 289
    Top = 24
    Width = 60
    Height = 12
    Caption = '发票日期：'
  end
  object Label3: TLabel [2]
    Left = 62
    Top = 47
    Width = 48
    Height = 12
    Caption = '供应商：'
  end
  object Label5: TLabel [3]
    Left = 74
    Top = 70
    Width = 36
    Height = 12
    Caption = '货币：'
  end
  object Label6: TLabel [4]
    Left = 62
    Top = 93
    Width = 48
    Height = 12
    Caption = '总金额：'
  end
  object Label7: TLabel [5]
    Left = 313
    Top = 93
    Width = 36
    Height = 12
    Caption = '税额：'
  end
  object Label8: TLabel [6]
    Left = 38
    Top = 116
    Width = 72
    Height = 12
    Caption = '已核销金额：'
  end
  object Label9: TLabel [7]
    Left = 26
    Top = 162
    Width = 84
    Height = 12
    Caption = '系统建挡人员：'
  end
  object Label10: TLabel [8]
    Left = 273
    Top = 163
    Width = 84
    Height = 12
    Caption = '系统建挡日期：'
  end
  object Label12: TLabel [9]
    Left = 74
    Top = 139
    Width = 36
    Height = 12
    Caption = '备注：'
  end
  object Label4: TLabel [10]
    Left = 313
    Top = 70
    Width = 36
    Height = 12
    Caption = '汇率：'
  end
  inherited btn_ok: TButton
    Left = 242
    Top = 199
    TabOrder = 9
  end
  inherited btn_Cancel: TButton
    Left = 351
    Top = 199
    TabOrder = 10
  end
  inherited Pnl_Add: TPanel
    TabOrder = 14
  end
  object Edt_ApInvoiceNo: TEdit [14]
    Left = 107
    Top = 20
    Width = 90
    Height = 20
    TabOrder = 0
  end
  object MEdt_ApInvoiceDate: TMaskEdit [15]
    Left = 349
    Top = 20
    Width = 75
    Height = 20
    EditMask = '!9999/99/00;1;_'
    MaxLength = 10
    TabOrder = 1
    Text = '    .  .  '
    OnExit = MEdt_ApInvoiceDateExit
  end
  object LEdt_VendorCode: TLinkEdit [16]
    Left = 107
    Top = 43
    Width = 90
    Height = 20
    LinkStyle = lsEllipsis
    TabOrder = 2
    OnButtonClick = LEdt_VendorCodeButtonClick
    OnChange = LEdt_VendorCodeChange
    OnExit = LEdt_VendorCodeExit
    OnKeyDown = LEdt_VendorCodeKeyDown
  end
  object Edt_VendorName: TEdit [17]
    Left = 200
    Top = 43
    Width = 224
    Height = 20
    Enabled = False
    TabOrder = 12
  end
  object LEdt_CurrencyCode: TLinkEdit [18]
    Left = 107
    Top = 66
    Width = 90
    Height = 20
    LinkStyle = lsEllipsis
    TabOrder = 3
    OnButtonClick = LEdt_CurrencyCodeButtonClick
    OnChange = LEdt_CurrencyCodeChange
    OnExit = LEdt_CurrencyCodeExit
    OnKeyDown = LEdt_CurrencyCodeKeyDown
  end
  object Edt_CurrencyName: TEdit [19]
    Left = 200
    Top = 66
    Width = 68
    Height = 20
    Enabled = False
    TabOrder = 11
  end
  object Edt_ApInvoiceAmount: TEdit [20]
    Left = 107
    Top = 89
    Width = 90
    Height = 20
    TabOrder = 5
    OnExit = Edt_ApInvoiceAmountExit
  end
  object Edt_ApInvoiceTax: TEdit [21]
    Left = 349
    Top = 89
    Width = 75
    Height = 20
    Enabled = False
    TabOrder = 6
    OnExit = FloatCheck
  end
  object Edt_ApPayedAmount: TEdit [22]
    Left = 107
    Top = 112
    Width = 90
    Height = 20
    TabOrder = 7
    OnExit = FloatCheck
  end
  object Edt_EmployeeCode: TEdit [23]
    Left = 107
    Top = 158
    Width = 57
    Height = 20
    Enabled = False
    TabOrder = 13
  end
  object Edt_ApInvoiceInputDate: TEdit [24]
    Left = 355
    Top = 159
    Width = 69
    Height = 20
    Enabled = False
    TabOrder = 15
  end
  object Edt_EmployeeName: TEdit [25]
    Left = 164
    Top = 158
    Width = 79
    Height = 20
    Enabled = False
    TabOrder = 16
  end
  object Edt_ApInvoiceRemArk: TEdit [26]
    Left = 107
    Top = 135
    Width = 317
    Height = 20
    MaxLength = 160
    TabOrder = 8
    OnEnter = Edt_ApInvoiceRemArkEnter
  end
  object Edt_ExchRate: TEdit [27]
    Left = 349
    Top = 66
    Width = 75
    Height = 20
    TabOrder = 4
    OnExit = FloatCheck
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 104
    Top = 224
  end
end