ulh.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 731 行 · 第 1/2 页

inherited frmUlh: TfrmUlh
  Left = 161
  Top = 28
  Width = 690
  Height = 478
  Caption = '采购催货单'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object sgUlh: TSDGrid [0]
    Left = 0
    Top = 121
    Width = 682
    Height = 258
    Align = alClient
    Color = clWhite
    ColCount = 12
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 4
    OnClick = sgUlhClick
    OnDblClick = sgUlhDblClick
    Columns = <
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '行号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '采购单号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '采购单行号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '物料编码'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '物料名称'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '规格型号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '单位'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '采购数量'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '未到数量'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '交货日期'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '拖期时间'
        ColumnWidth = 0
      end>
    ColWidths = (
      6
      33
      72
      64
      81
      73
      83
      36
      53
      70
      64
      70)
  end
  object FloatPanel2: TFloatPanel [1]
    Left = 0
    Top = 121
    Width = 682
    Height = 258
    Align = alClient
    Color = clWhite
    Caption = 'FloatPanel2'
    ParentColor = False
    TabOrder = 5
    object GroupBox1: TGroupBox
      Left = 6
      Top = 3
      Width = 289
      Height = 238
      Ctl3D = True
      ParentCtl3D = False
      TabOrder = 0
      object Label6: TLabel
        Left = 11
        Top = 19
        Width = 30
        Height = 12
        Caption = '行号:'
      end
      object Label7: TLabel
        Left = 11
        Top = 52
        Width = 54
        Height = 12
        Caption = '采购单号:'
      end
      object Label8: TLabel
        Left = 11
        Top = 86
        Width = 66
        Height = 12
        Caption = '采购单行号:'
        Enabled = False
      end
      object Label9: TLabel
        Left = 11
        Top = 119
        Width = 54
        Height = 12
        Caption = '物料编号:'
        Enabled = False
      end
      object Label10: TLabel
        Left = 11
        Top = 152
        Width = 54
        Height = 12
        Caption = '物料名称:'
        Enabled = False
      end
      object Label11: TLabel
        Left = 11
        Top = 219
        Width = 54
        Height = 12
        Caption = '计量单位:'
        Enabled = False
      end
      object Label13: TLabel
        Left = 11
        Top = 186
        Width = 66
        Height = 12
        Caption = '采购单数量:'
        Enabled = False
      end
      object seUldLine: TSDEdit
        Left = 83
        Top = 14
        Width = 185
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 0
        Text = 'seUldLine'
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
      object seUldGoodsName: TSDEdit
        Left = 83
        Top = 147
        Width = 185
        Height = 18
        TabStop = False
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 1
        Text = 'seUldGoodsName'
        SplitSymbol = ' | '
      end
      object seUldPoQty: TSDEdit
        Left = 83
        Top = 181
        Width = 185
        Height = 18
        TabStop = False
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 2
        DigLen = 4
        CharType = ctMathematic
        SplitSymbol = ' | '
      end
      object seUldUnit: TSDEdit
        Left = 83
        Top = 216
        Width = 113
        Height = 18
        TabStop = False
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 3
        Text = 'seUldUnit'
        KeyItem = cbItem2
        SplitSymbol = ' | '
      end
      object seUldGoods: TSDEdit
        Left = 83
        Top = 116
        Width = 178
        Height = 18
        TabStop = False
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 4
        Text = 'seUldGoods'
        SplitSymbol = ' | '
      end
      object seUldPoCode: TSDEdit
        Left = 85
        Top = 45
        Width = 181
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 5
        Text = 'seUldPoCode'
        OnButtonClick = seUldPoCodeButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
      end
      object seUldPodLine: TSDEdit
        Left = 87
        Top = 80
        Width = 151
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 6
        Text = '0'
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object GoodsSpec: TSDEdit
        Left = 185
        Top = 107
        Width = 92
        Height = 18
        TabStop = False
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 7
        Text = 'seUldGoodsName'
        Visible = False
        SplitSymbol = ' | '
      end
    end
    object GroupBox2: TGroupBox
      Left = 303
      Top = 3
      Width = 282
      Height = 237
      TabOrder = 1
      object Label14: TLabel
        Left = 9
        Top = 24
        Width = 66
        Height = 12
        Caption = '未到货数量:'
      end
      object Label15: TLabel
        Left = 9
        Top = 135
        Width = 54
        Height = 12
        Caption = '拖期时间:'
        Enabled = False
      end
      object Label16: TLabel
        Left = 9
        Top = 61
        Width = 54
        Height = 12
        Caption = '发货日期:'
        Enabled = False
      end
      object Label19: TLabel
        Left = 9
        Top = 172
        Width = 54
        Height = 12
        Caption = '交货地点:'