bomquery.dfm

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

inherited frmBomQuery: TfrmBomQuery
  Left = 32
  Top = 25
  Width = 742
  Height = 526
  Caption = 'Bom查询'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 458
    Width = 734
  end
  inherited CoolBar1: TCoolBar
    Width = 734
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 734
      end>
    inherited tbMainBar: TToolBar
      Width = 721
      inherited tbQuery: TToolButton
        Visible = False
      end
      inherited tbRefresh: TToolButton
        Visible = False
      end
      inherited tbPrint: TToolButton
        Visible = False
      end
      inherited tbExport: TToolButton
        Visible = False
      end
      inherited tbFirst: TToolButton
        Enabled = False
      end
      inherited tbPrevious: TToolButton
        Enabled = False
      end
      inherited tbNext: TToolButton
        Enabled = False
      end
      inherited tbLast: TToolButton
        Enabled = False
      end
    end
  end
  object tvBomInfo: TSDTreeView [2]
    Left = 0
    Top = 39
    Width = 345
    Height = 419
    Align = alLeft
    Indent = 19
    ParentColor = False
    ReadOnly = True
    TabOrder = 2
    TabStop = True
    OnChange = tvBomInfoItemChange
    OnDblClick = tvBomInfoDblClick
  end
  object PageControl1: TPageControl [3]
    Left = 345
    Top = 39
    Width = 389
    Height = 419
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 3
    object TabBomTvm: TTabSheet
      Caption = '多级反查'
      object tvBomMReverse: TSDTreeView
        Left = 0
        Top = 0
        Width = 381
        Height = 392
        Align = alClient
        Indent = 19
        ParentColor = False
        TabOrder = 0
        TabStop = True
      end
    end
    object TabSheet2: TTabSheet
      Caption = '单级反查'
      ImageIndex = 1
      object tvBomReverse: TSDTreeView
        Left = 0
        Top = 0
        Width = 381
        Height = 392
        Align = alClient
        Indent = 19
        ParentColor = False
        TabOrder = 0
        TabStop = True
      end
    end
    object TabSheet1: TTabSheet
      Caption = '最终子件'
      ImageIndex = 2
      object gBomEndChild: TSDGrid
        Left = 0
        Top = 0
        Width = 381
        Height = 392
        Align = alClient
        ColCount = 6
        DefaultRowHeight = 18
        FixedColor = 8564917
        FixedCols = 0
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goAlwaysShowEditor]
        TabOrder = 0
        Columns = <
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '物料编号'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '物料名称'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '单位'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            ColumnFont.Style = []
            TitleString = '消耗定额'
            ColumnWidth = 0
          end
          item
            ColumnFont.Charset = DEFAULT_CHARSET
            ColumnFont.Color = clWindowText
            ColumnFont.Height = -11
            ColumnFont.Name = 'MS Sans Serif'
            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 = (
          64
          130
          31
          53
          39
          58)
        RowHeights = (
          18
          18
          18
          18
          18)
      end
    end
  end
end