ar_enter_saleinvoice4.dfm

一个MRPII系统源代码版本

inherited Frm_Ar_Enter_SaleInvoice4: TFrm_Ar_Enter_SaleInvoice4
  Left = 28
  Top = 116
  Caption = '专用发票'
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = '专用发票'
    Font.Color = clRed
  end
  inherited Pnl_Head: TPanel
    Height = 155
    inherited Image1: TImage
      Height = 155
    end
    object Label1: TLabel
      Left = 50
      Top = 29
      Width = 36
      Height = 12
      Caption = '客户：'
      TransParent = True
    end
    object Label3: TLabel
      Left = 184
      Top = 6
      Width = 60
      Height = 12
      Caption = '开票日期：'
      TransParent = True
    end
    object Label8: TLabel
      Left = 567
      Top = 6
      Width = 36
      Height = 12
      Caption = '货币：'
      TransParent = True
    end
    object Label10: TLabel
      Left = 26
      Top = 53
      Width = 60
      Height = 12
      Caption = '付款条款：'
      TransParent = True
    end
    object Label11: TLabel
      Left = 543
      Top = 123
      Width = 60
      Height = 12
      Caption = '制单人员：'
      TransParent = True
    end
    object Label14: TLabel
      Left = 50
      Top = 124
      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 = 309
      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 = 38
      Top = 6
      Width = 48
      Height = 12
      Caption = '发票号：'
      TransParent = True
    end
    object Label20: TLabel
      Left = 756
      Top = 9
      Width = 6
      Height = 12
      TransParent = True
      Visible = False
    end
    object Label4: TLabel
      Left = 26
      Top = 76
      Width = 60
      Height = 12
      Caption = '开户银行：'
      TransParent = True
    end
    object Label5: TLabel
      Left = 333
      Top = 76
      Width = 60
      Height = 12
      Caption = '银行帐号：'
      TransParent = True
    end
    object Label6: TLabel
      Left = 333
      Top = 6
      Width = 36
      Height = 12
      Caption = '汇率：'
      TransParent = True
    end
    object Label7: TLabel
      Left = 50
      Top = 100
      Width = 36
      Height = 12
      Caption = '税号：'
      TransParent = True
    end
    object Label9: TLabel
      Left = 543
      Top = 53
      Width = 60
      Height = 12
      Caption = '销售部门：'
      TransParent = True
    end
    object Label12: TLabel
      Left = 543
      Top = 30
      Width = 60
      Height = 12
      Caption = '销售类型：'
      TransParent = True
    end
    object Label13: TLabel
      Left = 531
      Top = 77
      Width = 72
      Height = 12
      Caption = '营销业务员：'
      TransParent = True
    end
    object Label16: TLabel
      Left = 424
      Top = 6
      Width = 36
      Height = 12
      Caption = '税率：'
      TransParent = True
    end
    object Label18: TLabel
      Left = 519
      Top = 100
      Width = 84
      Height = 12
      Caption = '未税金额总额：'
      TransParent = True
    end
    object Label19: TLabel
      Left = 370
      Top = 121
      Width = 60
      Height = 12
      Caption = '入帐日期：'
      TransParent = True
    end
    object MEdt_CreateDate: TMaskEdit
      Left = 243
      Top = 2
      Width = 81
      Height = 20
      EditMask = '!9999/99/99;1;_'
      MaxLength = 10
      TabOrder = 1
      Text = '    .  .  '
      OnExit = DateCheck
    end
    object Edt_TotalTaxAmount: TEdit
      Left = 390
      Top = 94
      Width = 120
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 19
      OnExit = FloatCheck
    end
    object Edt_RemArk: TEdit
      Left = 86
      Top = 118
      Width = 268
      Height = 20
      TabOrder = 21
    end
    object Edt_InvoiceNo: TEdit
      Left = 86
      Top = 2
      Width = 96
      Height = 20
      TabOrder = 0
    end
    object Edt_CreateEmployeeCode: TExtEdit
      Left = 605
      Top = 117
      Width = 51
      Height = 20
      TabOrder = 23
      OnExit = EmployeeCodeCheck
      OnKeyDown = EmployeeHint
      DispLabel = Label20
    end
    object Edt_CustomerBank: TEdit
      Left = 86
      Top = 71
      Width = 212
      Height = 20
      TabOrder = 14
    end
    object Edt_CustomerBankActNo: TEdit
      Left = 390
      Top = 71
      Width = 120
      Height = 20
      TabOrder = 15
    end
    object Edt_ExchangeRate: TEdit
      Left = 370
      Top = 2
      Width = 49
      Height = 20
      TabOrder = 2
      OnExit = FloatCheck
    end
    object Edit1: TEdit
      Left = 658
      Top = 2
      Width = 88
      Height = 20
      Enabled = False
      TabOrder = 5
    end
    object Edit2: TEdit
      Left = 138
      Top = 25
      Width = 372
      Height = 20
      Enabled = False
      TabOrder = 7
    end
    object Edit3: TEdit
      Left = 138
      Top = 48
      Width = 372
      Height = 20
      Enabled = False
      TabOrder = 11
    end
    object edt_taxactno: TEdit
      Left = 86
      Top = 94
      Width = 212
      Height = 20
      Enabled = False
      TabOrder = 18
    end
    object edt_CustomerCode: TLinkEdit
      Left = 86
      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 = 86
      Top = 48
      Width = 50
      Height = 20
      LinkStyle = lsEllipsis
      TabOrder = 10
      OnButtonClick = edt_SaletermCodeButtonClick
      OnExit = Edt_SaleTermCodeExit