bomlist.dfm

科思ERP部分源码及控件

inherited frmBomList: TfrmBomList
  Left = 37
  Top = 87
  Width = 732
  Height = 458
  Caption = 'Bom列表'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 393
    Width = 724
  end
  inherited CoolBar1: TCoolBar
    Width = 724
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 724
      end>
    inherited tbMainBar: TToolBar
      Width = 711
      inherited tbQuery: TToolButton
        Visible = False
      end
      inherited tbRefresh: TToolButton
        Visible = False
      end
    end
  end
  object gBomList: TSDGrid [2]
    Left = 0
    Top = 39
    Width = 724
    Height = 354
    ColCount = 10
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goAlwaysShowEditor]
    ParentCtl3D = False
    TabOrder = 2
    Columns = <
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '层次'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '物料编号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '物料名称'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '来源'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '单位'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '消耗定额'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '累计消耗量'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '损耗率'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '毛需求'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -12
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '所属产品'
        ColumnWidth = 0
      end>
    ColWidths = (
      52
      98
      113
      64
      64
      64
      64
      64
      64
      64)
  end
  object bCBom: TButton [3]
    Left = 48
    Top = 360
    Width = 59
    Height = 25
    Caption = '成本Bom'
    TabOrder = 3
    Visible = False
    OnClick = bCBomClick
  end
  object bWBom: TButton [4]
    Left = 107
    Top = 360
    Width = 57
    Height = 25
    Caption = '重量Bom'
    TabOrder = 4
    Visible = False
    OnClick = bWBomClick
  end
  object bPurch: TButton [5]
    Left = 485
    Top = 360
    Width = 43
    Height = 25
    Caption = '采购件'
    TabOrder = 5
    Visible = False
    OnClick = bPurchClick
  end
  object bManu: TButton [6]
    Left = 528
    Top = 360
    Width = 43
    Height = 25
    Caption = '制造件'
    TabOrder = 6
    Visible = False
    OnClick = bManuClick
  end
  object bWprod: TButton [7]
    Left = 571
    Top = 360
    Width = 43
    Height = 25
    Caption = '外协件'
    TabOrder = 7
    Visible = False
    OnClick = bWprodClick
  end
  object bAllgoods: TButton [8]
    Left = 624
    Top = 360
    Width = 43
    Height = 25
    Caption = '全部'
    TabOrder = 8
    Visible = False
    OnClick = bAllgoodsClick
  end
  inherited MainMenu1: TMainMenu
    inherited muView: TMenuItem
      object N3: TMenuItem
        Caption = '采购件'
        GroupIndex = 1
        OnClick = bPurchClick
      end
      object N4: TMenuItem
        Caption = '制造件'
        GroupIndex = 1
        OnClick = bManuClick
      end
      object N6: TMenuItem
        Caption = '外协件'
        GroupIndex = 1
        OnClick = bWprodClick
      end
      object A1: TMenuItem
        Caption = '全部(&A)'
        GroupIndex = 1
        OnClick = bAllgoodsClick
      end
    end
    inherited muQuery: TMenuItem
      object muCBom: TMenuItem
        Caption = '成本Bom(&C)'
        OnClick = bCBomClick
      end
      object BomW1: TMenuItem
        Caption = '重量Bom(&W)'
        OnClick = bWBomClick
      end
    end
  end
end