wo.dfm

速达开源ERP系统

inherited frmWo: TfrmWo
  Left = 145
  Top = 409
  Width = 704
  Height = 576
  Caption = '加工工单'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 508
    Width = 696
  end
  inherited CoolBar1: TCoolBar
    Width = 696
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 696
      end>
    inherited tbMainBar: TToolBar
      Width = 683
      inherited tbGenrate: TToolButton
        Visible = True
      end
      inherited tbCheck: TToolButton
        Visible = True
      end
      inherited tbClose: TToolButton
        Visible = True
      end
      inherited ToolButton1: TToolButton
        Visible = True
      end
    end
  end
  object sgWo: TSDGrid [2]
    Left = 0
    Top = 39
    Width = 361
    Height = 437
    Align = alLeft
    Color = clWhite
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 2
    OnClick = sgWoClick
    SelectColor = clBackground
    EvenGridColor = clWindow
    OddGridColor = 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 = (
      82
      92
      44
      50
      64)
  end
  object PageControl1: TPageControl [3]
    Left = 361
    Top = 39
    Width = 335
    Height = 437
    ActivePage = BaseInfo
    Align = alClient
    TabOrder = 3
    object BaseInfo: TTabSheet
      Caption = '基本资料  '
      object FloatPanel1: TFloatPanel
        Left = 0
        Top = 0
        Width = 327
        Height = 410
        Align = alClient
        Color = clWhite
        Caption = 'FloatPanel1'
        ParentColor = False
        TabOrder = 0
        object Label1: TLabel
          Left = 8
          Top = 13
          Width = 54
          Height = 12
          Caption = '工单编号:'
        end
        object Label3: TLabel
          Left = 8
          Top = 62
          Width = 54
          Height = 12
          Caption = '工单类型:'
        end
        object Label4: TLabel
          Left = 8
          Top = 233
          Width = 54
          Height = 12
          Caption = '物耗方式:'
        end
        object Label5: TLabel
          Left = 8
          Top = 257
          Width = 54
          Height = 12
          Caption = '跟踪方式:'
        end
        object Label6: TLabel
          Left = 8
          Top = 86
          Width = 54
          Height = 12
          Caption = '加工件码:'
        end
        object Label7: TLabel
          Left = 8
          Top = 111
          Width = 54
          Height = 12
          Caption = '编码名称:'
        end
        object Label9: TLabel
          Left = 8
          Top = 330
          Width = 54
          Height = 12
          Caption = '订单单号:'
        end
        object Label10: TLabel
          Left = 234
          Top = 330
          Width = 30
          Height = 12
          Caption = '行号:'
          Enabled = False
        end
        object Label24: TLabel
          Left = 8
          Top = 355
          Width = 42
          Height = 12
          Caption = '生管员:'
        end
        object Label26: TLabel
          Left = 8
          Top = 281
          Width = 54
          Height = 12
          Caption = '工艺路线:'
        end
        object Label12: TLabel
          Left = 8
          Top = 135
          Width = 54
          Height = 12
          Caption = '计量单位:'
        end
        object Label11: TLabel
          Left = 8
          Top = 306
          Width = 30
          Height = 12
          Caption = '批号:'
        end
        object Label43: TLabel
          Left = 8
          Top = 159
          Width = 54
          Height = 12
          Caption = '加工数量:'
        end
        object Label49: TLabel
          Left = 8
          Top = 37
          Width = 54
          Height = 12
          Caption = '录单日期:'
        end
        object Label50: TLabel
          Left = 8
          Top = 208
          Width = 54
          Height = 12
          Caption = '完工日期:'
        end
        object Label51: TLabel
          Left = 8
          Top = 184
          Width = 54
          Height = 12
          Caption = '开工日期:'
        end
        object Label52: TLabel
          Left = 162
          Top = 208
          Width = 60
          Height = 12
          Caption = 'MRP需求日:'
          Enabled = False
        end
        object labWoMdate: TLabel
          Left = 225
          Top = 208
          Width = 42
          Height = 12
          Caption = 'WoMdate'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object Label54: TLabel
          Left = 8
          Top = 379
          Width = 54
          Height = 12
          Caption = '系统日期:'
          Enabled = False
        end
        object labWoSysDate: TLabel
          Left = 66
          Top = 378
          Width = 54
          Height = 12
          Caption = 'WoSysDate'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
        end
        object seWoCode: TSDEdit
          Left = 66
          Top = 8
          Width = 135
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 0
          Text = 'seWoCode'
          OnKeyDown = seWoCodeKeyDown
          SplitSymbol = ' | '
        end
        object scWoType: TSDComboBox
          Left = 66
          Top = 54
          Width = 137
          Height = 20
          Style = csDropDownList
          Ctl3D = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 2
          Items.Strings = (
            '1-常规加工'
            '2-返工'
            '3-改装'
            '4-委外'
            '5-副产品')
        end
        object scWoConsume: TSDComboBox
          Left = 66
          Top = 224
          Width = 149
          Height = 20
          Style = csDropDownList
          Ctl3D = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 9
          Items.Strings = (
            '1-据物料单'
            '2-据配套表')
        end
        object scWoTrace: TSDComboBox
          Left = 66
          Top = 248
          Width = 149
          Height = 20
          Style = csDropDownList
          Ctl3D = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 10
          OnClick = scWoTraceClick
          Items.Strings = (
            '1-按工艺路线'
            '2-按工单路线')
        end
        object seWoGoods: TSDEdit
          Left = 66
          Top = 79
          Width = 184
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 3
          Text = 'seWoGoods'
          OnExit = seWoGoodsExit
          OnButtonClick = seWoGoodsButtonClick
          ButtonVisible = True
          KeyItem = cbItem2
          SplitSymbol = ' | '
        end
        object seWoGoodsName: TSDEdit
          Left = 66
          Top = 103
          Width = 184
          Height = 18
          TabStop = False
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 4
          Text = 'seWoGoodsName'
          SplitSymbol = ' | '
        end
        object scWoProducter: TSDComboBox
          Left = 66
          Top = 346
          Width = 144
          Height = 20
          Style = csDropDownList
          Ctl3D = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 15
          KeyItem = cbItem2
        end
        object scWoUnit: TSDComboBox
          Left = 66
          Top = 127
          Width = 112
          Height = 20
          Style = csDropDownList
          Ctl3D = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 5
          KeyItem = cbItem2
        end
        object cheWoChkFlg: TCheckBox
          Left = 211
          Top = 7
          Width = 65
          Height = 19
          Caption = '检验标识'
          Font.Charset = GB2312_CHARSET
          Font.Color = clNavy
          Font.Height = -12
          Font.Name = '宋体'
          Font.Style = []
          ParentFont = False
          TabOrder = 16
        end
        object scWoBatch: TSDComboBox
          Left = 66
          Top = 298
          Width = 159
          Height = 20
          Style = csDropDownList
          Ctl3D = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 12
          KeyItem = cbItem2
        end
        object seWoSoCode: TSDEdit
          Left = 66
          Top = 325
          Width = 159
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 13
          Text = 'seWoSoCode'
          OnButtonClick = seWoSoCodeButtonClick
          ButtonVisible = True
          SplitSymbol = ' | '
        end
        object seWoRoute: TSDEdit
          Left = 66
          Top = 275
          Width = 159
          Height = 18
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 11
          Text = 'seWoRoute'
          OnButtonClick = seWoRouteButtonClick
          ButtonVisible = True
          KeyItem = cbItem2
          SplitSymbol = ' | '
        end
        object seWoSodLine: TSDEdit
          Left = 263
          Top = 325
          Width = 52
          Height = 18
          TabStop = False
          Ctl3D = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 14
          Text = 'seLine'
          SplitSymbol = ' | '
        end
        object seWoQty: TSDEdit
          Left = 66
          Top = 151
          Width = 110
          Height = 18
          Ctl3D = False
          MaxLength = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 6
          Text = '0'
          DigLen = 4
          DataType = dtNumber
          CharType = ctMathematic
          SplitSymbol = ' | '
          DefaultValue = '0'
        end
        object deWoDate: TDateEdit
          Left = 66
          Top = 33
          Width = 85
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2001-04-27'
          InitDate = '2001-04-27'
          ModalResult = 0
          TabOrder = 1
          Color = 50331647
          Ctl3D = False
          ParentCtl3D = False
        end
        object deWoRdate: TDateEdit
          Left = 66
          Top = 203
          Width = 88
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2001-04-27'
          InitDate = '2001-04-27'
          ModalResult = 0
          TabOrder = 8
          Color = 50331647
          Ctl3D = False
          ParentCtl3D = False
        end
        object deWoSdate: TDateEdit
          Left = 66
          Top = 179
          Width = 88