ad_enter_assetcardusedept_d.dfm

来自「一个MRPII系统源代码版本」· DFM 代码 · 共 169 行

inherited Frm_Ad_Enter_AssetCardUseDept_D: TFrm_Ad_Enter_AssetCardUseDept_D
  Left = 234
  Top = 210
  Caption = '使用部门'
  ClientHeight = 182
  ClientWidth = 406
  PixelsPerInch = 96
  TextHeight = 12
  object Label2: TLabel [0]
    Left = 27
    Top = 16
    Width = 60
    Height = 12
    Caption = '部门代码：'
  end
  object Label11: TLabel [1]
    Left = 39
    Top = 90
    Width = 48
    Height = 12
    Caption = '分配率：'
  end
  object Label14: TLabel [2]
    Left = 51
    Top = 115
    Width = 36
    Height = 12
    Caption = '备注：'
  end
  object Label13: TLabel [3]
    Left = 183
    Top = 92
    Width = 12
    Height = 12
    Caption = '％'
  end
  object Label17: TLabel [4]
    Left = 19
    Top = 315
    Width = 72
    Height = 12
    Caption = '最后操作时间'
    Visible = False
  end
  object Label15: TLabel [5]
    Left = 23
    Top = 291
    Width = 60
    Height = 12
    Caption = '准备发货量'
    Visible = False
  end
  object Label3: TLabel [6]
    Left = 27
    Top = 41
    Width = 60
    Height = 12
    Caption = '部门名称：'
  end
  object Label1: TLabel [7]
    Left = 27
    Top = 66
    Width = 60
    Height = 12
    Caption = '费用科目：'
  end
  inherited btn_ok: TButton
    Left = 155
    Top = 145
    TabOrder = 6
  end
  inherited btn_Cancel: TButton
    Left = 259
    Top = 145
    TabOrder = 7
  end
  inherited Pnl_Add: TPanel
    Left = 435
    Top = 2
    TabOrder = 10
  end
  object EDT_AssignRate: TEdit [11]
    Left = 88
    Top = 84
    Width = 91
    Height = 20
    TabOrder = 4
    Text = ' '
    OnChange = AllChange
    OnExit = EDT_AssignRateExit
  end
  object Edt_RemArk: TEdit [12]
    Left = 88
    Top = 108
    Width = 274
    Height = 20
    TabOrder = 5
    OnChange = AllChange
  end
  object MEdt_LastOperationTime: TMaskEdit [13]
    Left = 97
    Top = 307
    Width = 20
    Height = 20
    Enabled = False
    EditMask = '!9999/99/99;1;_'
    MaxLength = 10
    TabOrder = 9
    Text = '    .  .  '
    Visible = False
  end
  object Edt_PrepareShipQty: TEdit [14]
    Left = 97
    Top = 283
    Width = 20
    Height = 20
    Enabled = False
    TabOrder = 8
    Visible = False
  end
  object Edt_DeptName: TEdit [15]
    Left = 88
    Top = 35
    Width = 250
    Height = 20
    Enabled = False
    TabOrder = 1
    Text = ' '
    OnChange = AllChange
  end
  object Edt_DeptCode: TLinkEdit [16]
    Left = 88
    Top = 10
    Width = 125
    Height = 20
    LinkStyle = lsEllipsis
    TabOrder = 0
    OnButtonClick = DeptHint1
    OnChange = AllChange
    OnExit = Edt_DeptCodeExit
    OnKeyDown = DeptHint
  end
  object EDT_kmCode: TLinkEdit [17]
    Left = 88
    Top = 59
    Width = 60
    Height = 20
    LinkStyle = lsEllipsis
    TabOrder = 2
    Text = ' '
    OnButtonClick = EDT_kmCodeButtonClick
    OnExit = EDT_kmCodeExit
    OnKeyDown = EDT_kmCodeKeyDown
  end
  object EDT_kmName: TExtEdit [18]
    Left = 150
    Top = 59
    Width = 120
    Height = 20
    Enabled = False
    ReadOnly = True
    TabOrder = 3
  end
  inherited AdoQry_Tmp: TAdoQuery
    Left = 375
    Top = 307
  end
end