ar_enter_saleinvoice3.dfm

一个MRPII系统源代码版本

inherited Frm_Ar_Enter_SaleInvoice3: TFrm_Ar_Enter_SaleInvoice3
  Left = 115
  Top = 73
  Caption = '普通发票'
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = '普通发票'
    Font.Color = clRed
  end
  inherited Pnl_Head: TPanel
    Height = 146
    inherited Image1: TImage
      Height = 146
    end
    object Label1: TLabel
      Left = 53
      Top = 29
      Width = 36
      Height = 12
      Caption = '客户：'
      TransParent = True
    end
    object Label3: TLabel
      Left = 186
      Top = 6
      Width = 60
      Height = 12
      Caption = '开票日期：'
      TransParent = True
    end
    object Label8: TLabel
      Left = 565
      Top = 6
      Width = 36
      Height = 12
      Caption = '货币：'
      TransParent = True
    end
    object Label10: TLabel
      Left = 29
      Top = 53
      Width = 60
      Height = 12
      Caption = '付款条款：'
      TransParent = True
    end
    object Label11: TLabel
      Left = 540
      Top = 100
      Width = 60
      Height = 12
      Caption = '制单人员：'
      TransParent = True
    end
    object Label14: TLabel
      Left = 53
      Top = 123
      Width = 36
      Height = 12
      Caption = '备注：'
      TransParent = True
    end
    object Label15: TLabel
      Left = 325
      Top = 8
      Width = 6
      Height = 12
    end
    object Lab_CurrencyName: TLabel
      Left = 147
      Top = 53
      Width = 6
      Height = 12
      Visible = False
    end
    object Label17: TLabel
      Left = 5
      Top = 100
      Width = 84
      Height = 12
      Caption = '含税金额总额：'
      TransParent = True
    end
    object Edt_CustomerName: TLabel
      Left = 176
      Top = 58
      Width = 6
      Height = 12
      Visible = False
    end
    object Lab_SaleTermName: TLabel
      Left = 188
      Top = 28
      Width = 6
      Height = 12
      Visible = False
    end
    object Label2: TLabel
      Left = 41
      Top = 6
      Width = 48
      Height = 12
      Caption = '发票号：'
      TransParent = True
    end
    object Label20: TLabel
      Left = 756
      Top = 9
      Width = 6
      Height = 12
      Visible = False
    end
    object Label4: TLabel
      Left = 29
      Top = 76
      Width = 60
      Height = 12
      Caption = '开户银行：'
      TransParent = True
    end
    object Label5: TLabel
      Left = 263
      Top = 76
      Width = 60
      Height = 12
      Caption = '银行帐号：'
      TransParent = True
    end
    object Label6: TLabel
      Left = 339
      Top = 6
      Width = 36
      Height = 12
      Caption = '汇率：'
      TransParent = True
    end
    object Label12: TLabel
      Left = 541
      Top = 29
      Width = 60
      Height = 12
      Caption = '销售类型：'
      TransParent = True
    end
    object Label7: TLabel
      Left = 541
      Top = 53
      Width = 60
      Height = 12
      Caption = '销售部门：'
      TransParent = True
    end
    object Label9: TLabel
      Left = 529
      Top = 76
      Width = 72
      Height = 12
      Caption = '营销业务员：'
      TransParent = True
    end
    object Label13: TLabel
      Left = 430
      Top = 6
      Width = 36
      Height = 12
      Caption = '税率：'
      TransParent = True
    end
    object Label16: TLabel
      Left = 239
      Top = 100
      Width = 84
      Height = 12
      Caption = '未税金额总额：'
      TransParent = True
    end
    object Label18: TLabel
      Left = 407
      Top = 100
      Width = 36
      Height = 12
      Caption = '税额：'
      TransParent = True
    end
    object Label19: TLabel
      Left = 516
      Top = 122
      Width = 84
      Height = 12
      Caption = '出口贸易类型：'
      TransParent = True
    end
    object Label21: TLabel
      Left = 382
      Top = 123
      Width = 60
      Height = 12
      Caption = '入帐日期：'
      TransParent = True
    end
    object MEdt_CreateDate: TMaskEdit
      Left = 251
      Top = 2
      Width = 81
      Height = 20
      EditMask = '!9999/99/99;1;_'
      MaxLength = 10
      TabOrder = 1
      Text = '    .  .  '
      OnExit = DateCheck
    end
    object Edt_TotalTaxAmount: TEdit
      Left = 87
      Top = 94
      Width = 96
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 18
      OnExit = FloatCheck
    end
    object Edt_RemArk: TEdit
      Left = 87
      Top = 117
      Width = 235
      Height = 20
      TabOrder = 21
    end
    object Edt_InvoiceNo: TEdit
      Left = 87
      Top = 2
      Width = 96
      Height = 20
      TabOrder = 0
    end
    object Edt_CreateEmployeeCode: TExtEdit
      Left = 605
      Top = 94
      Width = 50
      Height = 20
      TabOrder = 20
      OnExit = EmployeeCodeCheck
      OnKeyDown = EmployeeHint
      DispLabel = Label20
    end
    object Edt_CustomerBank: TEdit
      Left = 87
      Top = 71
      Width = 162
      Height = 20
      TabOrder = 14
    end
    object Edt_CustomerBankActNo: TEdit
      Left = 324
      Top = 71
      Width = 188
      Height = 20
      TabOrder = 15
    end
    object Edt_ExchangeRate: TEdit
      Left = 378
      Top = 2
      Width = 46
      Height = 20
      TabOrder = 2
      OnExit = FloatCheck
    end
    object Edit1: TEdit
      Left = 657
      Top = 2
      Width = 88
      Height = 20
      Enabled = False
      TabOrder = 5
    end
    object Edit2: TEdit
      Left = 139
      Top = 25
      Width = 373
      Height = 20
      Enabled = False
      TabOrder = 7
    end
    object Edit3: TEdit
      Left = 139
      Top = 48
      Width = 373
      Height = 20
      Enabled = False
      TabOrder = 11
    end
    object edt_CustomerCode: TLinkEdit
      Left = 87
      Top = 25
      Width = 50
      Height = 20
      LinkStyle = lsEllipsis
      TabOrder = 6
      OnButtonClick = CustomerHint1
      OnExit = Edt_CustomerCodeExit
      OnKeyDown = CustomerHint
    end
    object edt_CurrencyCode: TLinkEdit
      Left = 605
      Top = 2
      Width = 50
      Height = 20
      LinkStyle = lsEllipsis
      TabOrder = 4
      OnButtonClick = CurrencyHint1
      OnExit = Edt_CurrencyCodeExit
      OnKeyDown = CurrencyHint
    end
    object edt_SaletermCode: TLinkEdit
      Left = 87
      Top = 48
      Width = 50
      Height = 20
      LinkStyle = lsEllipsis
      TabOrder = 10
      OnButtonClick = edt_SaletermCodeButtonClick
      OnExit = Edt_SaleTermCodeExit
      OnKeyDown = Edt_SaleTermCodeKeyDown
    end
    object edt_SaleTypeCode: TLinkEdit
      Left = 605
      Top = 25
      Width = 50
      Height = 20
      LinkStyle = lsEllipsis
      TabOrder = 8
      OnButtonClick = edt_SaleTypeCodeButtonClick
      OnExit = edt_SaleTypeCodeExit
      OnKeyDown = edt_SaleTypeCodeKeyDown
    end
    object edt_SaleTypeName: TEdit