sal_enter_shiporder.dfm

一个MRPII系统源代码版本

inherited Frm_Sal_Enter_ShipOrder: TFrm_Sal_Enter_ShipOrder
  Left = 105
  Top = 183
  Caption = '销售发货'
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = '销售发货'
  end
  inherited Pnl_Head: TPanel
    Height = 165
    TabStop = True
    inherited Image1: TImage
      Height = 165
    end
    object Label1: TLabel
      Left = 33
      Top = 29
      Width = 60
      Height = 12
      Caption = '销售客户：'
      TransParent = True
    end
    object Label3: TLabel
      Left = 194
      Top = 6
      Width = 60
      Height = 12
      Caption = '发货日期：'
      TransParent = True
    end
    object Label4: TLabel
      Left = 9
      Top = 6
      Width = 84
      Height = 12
      Caption = '销售发货单号：'
      TransParent = True
    end
    object Label5: TLabel
      Left = 506
      Top = 120
      Width = 60
      Height = 12
      Caption = '销售类型：'
      TransParent = True
    end
    object Label6: TLabel
      Left = 506
      Top = 29
      Width = 60
      Height = 12
      Caption = '销售部门：'
      TransParent = True
    end
    object Label7: TLabel
      Left = 494
      Top = 97
      Width = 72
      Height = 12
      Caption = '营销业务员：'
      TransParent = True
    end
    object Label8: TLabel
      Left = 530
      Top = 6
      Width = 36
      Height = 12
      Caption = '货币：'
      TransParent = True
    end
    object Label9: TLabel
      Left = 363
      Top = 6
      Width = 60
      Height = 12
      Caption = '销售税率：'
      TransParent = True
    end
    object Label10: TLabel
      Left = 33
      Top = 75
      Width = 60
      Height = 12
      Caption = '付款条款：'
      TransParent = True
    end
    object Label12: TLabel
      Left = 33
      Top = 98
      Width = 60
      Height = 12
      Caption = '发运方式：'
      TransParent = True
    end
    object Label13: TLabel
      Left = 33
      Top = 52
      Width = 60
      Height = 12
      Caption = '发货地址：'
      TransParent = True
    end
    object Label14: TLabel
      Left = 51
      Top = 121
      Width = 42
      Height = 12
      Caption = '备注1：'
      TransParent = True
    end
    object Label15: TLabel
      Left = 325
      Top = 7
      Width = 6
      Height = 12
    end
    object Lab_CurrencyName: TLabel
      Left = 141
      Top = 35
      Width = 6
      Height = 12
      Visible = False
    end
    object Lab_SaleDeptName: TLabel
      Left = 301
      Top = 29
      Width = 6
      Height = 12
      Visible = False
    end
    object Label16: TLabel
      Left = 328
      Top = 75
      Width = 60
      Height = 12
      Caption = '未税总额：'
      TransParent = True
    end
    object Label17: TLabel
      Left = 328
      Top = 98
      Width = 60
      Height = 12
      Caption = '含税总额：'
      TransParent = True
    end
    object Lab_CustomerName: TLabel
      Left = 176
      Top = 82
      Width = 6
      Height = 12
      Visible = False
    end
    object Lab_SaleEmployeeName: TLabel
      Left = 141
      Top = 63
      Width = 6
      Height = 12
      Visible = False
    end
    object Lab_SaleTermName: TLabel
      Left = 326
      Top = 54
      Width = 6
      Height = 12
    end
    object lab_ShipModeName: TLabel
      Left = 604
      Top = 127
      Width = 6
      Height = 12
      Visible = False
    end
    object Lab_ShipAddressName: TLabel
      Left = 213
      Top = 103
      Width = 6
      Height = 12
      Visible = False
    end
    object Label20: TLabel
      Left = 756
      Top = 9
      Width = 6
      Height = 12
      TransParent = True
      Visible = False
    end
    object Label2: TLabel
      Left = 51
      Top = 144
      Width = 42
      Height = 12
      Caption = '备注2：'
      TransParent = True
    end
    object Label11: TLabel
      Left = 506
      Top = 52
      Width = 60
      Height = 12
      Caption = '仓库标识：'
      TransParent = True
    end
    object Label18: TLabel
      Left = 506
      Top = 75
      Width = 60
      Height = 12
      Caption = '货位标识：'
      TransParent = True
    end
    object Label19: TLabel
      Left = 507
      Top = 147
      Width = 60
      Height = 12
      Caption = '单据类型：'
      TransParent = True
    end
    object Edt_InvBillNo: TEdit
      Left = 93
      Top = 2
      Width = 97
      Height = 20
      TabOrder = 0
    end
    object MEdt_CreateDate: TMaskEdit
      Left = 256
      Top = 2
      Width = 79
      Height = 20
      EditMask = '!9999/99/99;1;_'
      MaxLength = 10
      TabOrder = 1
      Text = ' .  -  -  '
      OnExit = MEdt_CreateDateExit
    end
    object Edt_TaxRate_Percent: TEdit
      Left = 421
      Top = 2
      Width = 51
      Height = 20
      TabOrder = 13
      OnExit = Edt_TaxRate_PercentExit
    end
    object Edt_TotalNoTaxAmount: TEdit
      Left = 391
      Top = 71
      Width = 80
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 2
      OnExit = FloatCheck
    end
    object Edt_TotalTaxAmount: TEdit
      Left = 391
      Top = 94
      Width = 80
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 3
      OnExit = FloatCheck
    end
    object Edt_RemArk: TEdit
      Left = 93
      Top = 117
      Width = 378
      Height = 20
      TabOrder = 21
    end
    object Edt_RemArk1: TEdit
      Left = 93
      Top = 140
      Width = 378
      Height = 20
      TabOrder = 22
      Text = ' '
    end
    object Edt_CustomerName: TEdit
      Left = 145
      Top = 25
      Width = 327
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 4
      Text = ' '
    end
    object Edt_SaleEmployeeName: TEdit
      Left = 618
      Top = 93
      Width = 134
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 5
      Text = ' '
    end
    object Edt_SaleTermName: TEdit
      Left = 145
      Top = 71
      Width = 161
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 6
      Text = ' '
    end
    object Edt_ShipAddressName: TEdit
      Left = 145
      Top = 48
      Width = 327
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 7
      Text = ' '
    end
    object Edt_SaleDeptName: TEdit
      Left = 618
      Top = 25
      Width = 134
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 8
      Text = ' '
    end
    object Edt_CurrencyName: TEdit
      Left = 618
      Top = 2
      Width = 134
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 9
      Text = ' '
    end
    object Edt_SaleTypeName: TEdit
      Left = 618
      Top = 116
      Width = 134
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 10
      Text = ' '
    end
    object Edt_ShipModeName: TEdit
      Left = 145
      Top = 94
      Width = 161
      Height = 20
      Enabled = False
      ReadOnly = True
      TabOrder = 11
      Text = ' '
    end
    object Edt_CustomerCode: TLinkEdit
      Left = 93
      Top = 25
      Width = 50
      Height = 20
      LinkStyle = lsEllipsis
      TabOrder = 12
      Text = ' '
      OnButtonClick = CustomerHint1
      OnExit = Edt_CustomerCodeExit
      OnKeyDown = CustomerHint
    end
    object Edt_ShipAddresSCode: TLinkEdit
      Left = 93
      Top = 48
      Width = 50
      Height = 20
      LinkStyle = lsEllipsis
      TabOrder = 14
      Text = ' '
      OnButtonClick = Edt_ShipAddresSCodeButtonClick
      OnExit = Edt_ShipAddresSCodeExit
      OnKeyDown = Edt_ShipAddresSCodeKeyDown
    end
    object Edt_PayTermCode: TLinkEdit
      Left = 93
      Top = 71