dml.dfm

速达开源ERP系统

inherited frmDml: TfrmDml
  Left = -342
  Top = 227
  Width = 589
  Height = 484
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = '工序材料分摊'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 416
    Width = 581
    Panels = <
      item
        Text = '当前操作状态'
        Width = 150
      end
      item
        Text = ' 当前操作员'
        Width = 100
      end
      item
        Text = '登录日期'
        Width = 80
      end
      item
        Text = '当前日期'
        Width = 80
      end
      item
        Text = 'Superdata ERP2000'
        Width = 50
      end>
  end
  inherited CoolBar1: TCoolBar
    Width = 581
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 581
      end>
    inherited tbMainBar: TToolBar
      Width = 568
    end
  end
  object sgDml: TSDGrid [2]
    Left = 0
    Top = 39
    Width = 293
    Height = 377
    Align = alLeft
    Color = clWhite
    ColCount = 3
    Ctl3D = False
    DefaultRowHeight = 20
    FixedColor = 8564917
    FixedCols = 0
    Font.Charset = GB2312_CHARSET
    Font.Color = clNavy
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 2
    OnClick = sgDmlClick
    Columns = <
      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 = (
      85
      132
      63)
  end
  object FloatPanel1: TFloatPanel [3]
    Left = 293
    Top = 39
    Width = 288
    Height = 377
    Align = alClient
    Color = clWhite
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 3
    object Label2: TLabel
      Left = 7
      Top = 110
      Width = 54
      Height = 12
      Caption = '物料编码:'
      Enabled = False
    end
    object Label7: TLabel
      Left = 7
      Top = 277
      Width = 54
      Height = 12
      Caption = '分摊数量:'
    end
    object Label9: TLabel
      Left = 7
      Top = 13
      Width = 54
      Height = 12
      Caption = '领料单号:'
      Enabled = False
    end
    object Label6: TLabel
      Left = 7
      Top = 37
      Width = 54
      Height = 12
      Caption = '领料行号:'
      Enabled = False
    end
    object Label5: TLabel
      Left = 7
      Top = 83
      Width = 54
      Height = 12
      Caption = '加工单号:'
      Enabled = False
    end
    object Label3: TLabel
      Left = 7
      Top = 227
      Width = 54
      Height = 12
      Caption = '工序代码:'
    end
    object Label11: TLabel
      Left = 7
      Top = 254
      Width = 54
      Height = 12
      Caption = '分摊货位:'
      Enabled = False
    end
    object Label12: TLabel
      Left = 7
      Top = 61
      Width = 54
      Height = 12
      Caption = '领料数量:'
      Enabled = False
    end
    object Panel1: TPanel
      Left = 4
      Top = 124
      Width = 256
      Height = 98
      BevelOuter = bvNone
      Color = clWhite
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 4
      object Label10: TLabel
        Left = 4
        Top = 53
        Width = 54
        Height = 12
        Caption = '物料类型:'
        Enabled = False
      end
      object Label1: TLabel
        Left = 4
        Top = 9
        Width = 54
        Height = 12
        Caption = '物料名称:'
        Enabled = False
      end
      object Label4: TLabel
        Left = 4
        Top = 31
        Width = 54
        Height = 12
        Caption = '计量单位:'
        Enabled = False
      end
      object Label8: TLabel
        Left = 4
        Top = 75
        Width = 54
        Height = 12
        Caption = '物料来源:'
        Enabled = False
      end
      object seDmlGoodsName: TSDEdit
        Left = 58
        Top = 3
        Width = 195
        Height = 18
        Ctl3D = False
        Font.Charset = GB2312_CHARSET
        Font.Color = clNavy
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentColor = True
        ParentCtl3D = False
        ParentFont = False
        TabOrder = 0
        Text = 'seDmlGoodsName'
        SplitSymbol = ' | '
      end
      object scDmlGoodsUnit: TSDComboBox
        Left = 58
        Top = 24
        Width = 132
        Height = 20
        Color = clWhite
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 1
        KeyItem = cbItem2
      end
      object scDmlGoodsType: TSDComboBox
        Left = 58
        Top = 46
        Width = 132
        Height = 20
        Color = clWhite
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 2
        Items.Strings = (
          '1-成品'
          '2-半成品'
          '3-材料'
          '4-备用件'
          '5-虚拟件'
          '6-费用件')
      end
      object scDmlGoodsFrom: TSDComboBox
        Left = 58
        Top = 68
        Width = 132
        Height = 20
        Color = clWhite
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 3
        Items.Strings = (
          '1-采购'
          '2-制造'
          '3-外加工')
      end
    end
    object scDmlGoods: TSDComboBox
      Left = 61
      Top = 102
      Width = 197
      Height = 20
      Color = clWhite
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 12
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 3
      Text = 'scDmlGoods'
    end
    object seDmlQty: TSDEdit
      Left = 61
      Top = 272
      Width = 111
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 7
      Text = '0'
      DigLen = 4
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object seDmlGmtCode: TSDEdit
      Left = 61
      Top = 10
      Width = 138
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      SplitSymbol = ' | '
    end
    object seDmlGmtdLine: TSDEdit
      Left = 61
      Top = 32
      Width = 100
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
      SplitSymbol = ' | '
    end
    object seDmlWoCode: TSDEdit
      Left = 61
      Top = 77
      Width = 138
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 2
      SplitSymbol = ' | '
    end
    object scDmlProcess: TSDComboBox
      Left = 61
      Top = 219
      Width = 197
      Height = 20
      Style = csDropDownList
      Color = clWhite
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 5
      OnClick = scDmlProcessClick
      KeyItem = cbItem2
    end
    object scDmlLoc: TSDComboBox
      Left = 61
      Top = 246
      Width = 198
      Height = 20
      Color = clWhite
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 12
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 6
      Text = 'scDmlLoc'
      KeyItem = cbItem2
    end
    object seDmlGmtdQty: TSDEdit
      Left = 61
      Top = 54
      Width = 100
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 8
      SplitSymbol = ' | '
    end
  end
  inherited PrnSetupDlg: TPrinterSetupDialog
    Left = 519
    Top = 67
  end
end