wrg.dfm

速达开源ERP系统

inherited frmWrg: TfrmWrg
  Left = 227
  Top = 155
  Width = 634
  Height = 525
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = '工单工艺路线'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 457
    Width = 626
  end
  inherited CoolBar1: TCoolBar
    Width = 626
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 626
      end>
    inherited tbMainBar: TToolBar
      Width = 613
      inherited tbGenrate: TToolButton
        Visible = True
      end
      inherited tbQuery: TToolButton
        Visible = False
      end
    end
  end
  object sgWrg: TSDGrid [2]
    Left = 0
    Top = 39
    Width = 326
    Height = 384
    Align = alLeft
    Color = clWhite
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect, goThumbTracking]
    ParentCtl3D = False
    TabOrder = 2
    OnClick = sgWrgClick
    SelectColor = clBackground
    EvenGridColor = clWhite
    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
      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 = (
      32
      86
      86
      54
      58)
  end
  object PageControl1: TPageControl [3]
    Left = 326
    Top = 39
    Width = 300
    Height = 384
    ActivePage = BaseInfo
    Align = alClient
    TabOrder = 3
    TabStop = False
    object BaseInfo: TTabSheet
      Caption = '基本资料        '
      object FloatPanel1: TFloatPanel
        Left = 0
        Top = 0
        Width = 292
        Height = 357
        Align = alClient
        Color = clWhite
        Caption = 'FloatPanel1'
        ParentColor = False
        TabOrder = 0
        object Label22: TLabel
          Left = 6
          Top = 64
          Width = 54
          Height = 12
          Caption = '工序代码:'
        end
        object Label1: TLabel
          Left = 6
          Top = 91
          Width = 54
          Height = 12
          Caption = '工序名称:'
        end
        object Label2: TLabel
          Left = 6
          Top = 118
          Width = 54
          Height = 12
          Caption = '工作中心:'
        end
        object Label3: TLabel
          Left = 6
          Top = 145
          Width = 54
          Height = 12
          Caption = '在制货位:'
        end
        object Label4: TLabel
          Left = 6
          Top = 173
          Width = 54
          Height = 12
          Caption = '生效日期:'
        end
        object Label5: TLabel
          Left = 6
          Top = 200
          Width = 54
          Height = 12
          Caption = '失效日期:'
        end
        object Label6: TLabel
          Left = 6
          Top = 227
          Width = 54
          Height = 12
          Caption = '工序类型:'
        end
        object Label7: TLabel
          Left = 6
          Top = 254
          Width = 54
          Height = 12
          Caption = '工序状态:'
        end
        object Label8: TLabel
          Left = 6
          Top = 281
          Width = 54
          Height = 12
          Caption = '外协费率:'
        end
        object TLabel
          Left = 28
          Top = 304
          Width = 30
          Height = 12
          Caption = '说明:'
        end
        object Label11: TLabel
          Left = 30
          Top = 37
          Width = 30
          Height = 12
          Caption = '序号:'
        end
        object Label9: TLabel
          Left = 30
          Top = 14
          Width = 30
          Height = 12
          Caption = '工单:'
        end
        object labWrgWo: TLabel
          Left = 64
          Top = 13
          Width = 48
          Height = 12
          Caption = 'labWrgWo'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = [fsUnderline]
          ParentFont = False
        end
        object seWrgName: TSDEdit
          Left = 62
          Top = 85
          Width = 194
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 1
          Text = 'seWrgName'
          SplitSymbol = ' | '
        end
        object scWrgWc: TSDComboBox
          Left = 62
          Top = 109
          Width = 149
          Height = 20
          Style = csDropDownList
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 4
          KeyItem = cbItem2
        end
        object deWrgEdate: TDateEdit
          Left = 62
          Top = 170
          Width = 87
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2001-04-26'
          InitDate = '2001-04-26'
          ModalResult = 0
          TabOrder = 5
          Color = 50331647
          Ctl3D = False
          ParentCtl3D = False
        end
        object deWrgIdate: TDateEdit
          Left = 62
          Top = 197
          Width = 87
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2001-04-26'
          InitDate = '2001-04-26'
          ModalResult = 0
          TabOrder = 6
          Color = 50331647
          Ctl3D = False
          ParentCtl3D = False
        end
        object cheChkFlg: TCheckBox
          Left = 191
          Top = 8
          Width = 77
          Height = 19
          Caption = '检验标识'
          TabOrder = 2
        end
        object cheWxFlg: TCheckBox
          Left = 191
          Top = 27
          Width = 74
          Height = 19
          Caption = '外协标识'
          TabOrder = 3
        end
        object scWrgState: TSDComboBox
          Left = 62
          Top = 245
          Width = 107
          Height = 20
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 8
          Items.Strings = (
            '1-预备'
            '2-确定'
            '3-停用'
            '4-作废')
        end
        object scWrgType: TSDComboBox
          Left = 62
          Top = 220
          Width = 107
          Height = 20
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 7
          Items.Strings = (
            '1-正常'
            '2-平行'
            '3-交叉'
            '4-混合')
        end
        object seWrgWxAmt: TSDEdit
          Left = 62
          Top = 273
          Width = 87
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 9
          SplitSymbol = ' | '
        end
        object memWrgDesc: TMemo
          Left = 60
          Top = 299
          Width = 193
          Height = 29
          Color = clWhite
          Ctl3D = False
          Lines.Strings = (
            '')
          ParentCtl3D = False
          TabOrder = 10
        end
        object scWrgProcess: TSDComboBox
          Left = 62
          Top = 57
          Width = 193
          Height = 20
          Style = csDropDownList
          Color = clWhite
          Ctl3D = False
          ItemHeight = 12
          ParentCtl3D = False
          TabOrder = 0
          OnClick = scWrgProcessClick
          KeyItem = cbItem2
        end
        object seWrgNo: TSDEdit
          Left = 62
          Top = 30
          Width = 121
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False