wn.dfm

科思ERP部分源码及控件

inherited frmWn: TfrmWn
  Left = 67
  Top = 35
  Width = 671
  Height = 548
  Caption = '工票'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 480
    Width = 663
  end
  inherited CoolBar1: TCoolBar
    Width = 663
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 663
      end>
    inherited tbMainBar: TToolBar
      Width = 650
    end
  end
  object sgWn: TSDGrid [2]
    Left = 0
    Top = 39
    Width = 321
    Height = 441
    Align = alLeft
    Color = clWhite
    ColCount = 4
    Ctl3D = False
    DefaultRowHeight = 16
    FixedColor = 8564917
    FixedCols = 0
    RowCount = 3
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    TabOrder = 2
    OnClick = sgWnClick
    SelectColor = clHighlight
    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>
    ColWidths = (
      102
      79
      68
      66)
  end
  object pgWn: TPageControl [3]
    Left = 321
    Top = 39
    Width = 342
    Height = 441
    ActivePage = tsWnBase
    Align = alClient
    TabOrder = 3
    object tsWnBase: TTabSheet
      Caption = '基本资料'
      object fpWnBase: TFloatPanel
        Left = 0
        Top = 0
        Width = 334
        Height = 414
        Color = clWhite
        Caption = 'fpWnBase'
        ParentColor = False
        TabOrder = 0
        object Label2: TLabel
          Left = 10
          Top = 14
          Width = 42
          Height = 12
          Caption = '工票号:'
        end
        object Label3: TLabel
          Left = 10
          Top = 65
          Width = 54
          Height = 12
          Caption = '工票日期:'
        end
        object Label4: TLabel
          Left = 10
          Top = 90
          Width = 54
          Height = 12
          Caption = '所在工序:'
        end
        object Label6: TLabel
          Left = 10
          Top = 116
          Width = 54
          Height = 12
          Caption = '产品编码:'
        end
        object Label7: TLabel
          Left = 10
          Top = 167
          Width = 54
          Height = 12
          Caption = '计量单位:'
        end
        object Label16: TLabel
          Left = 10
          Top = 192
          Width = 54
          Height = 12
          Caption = '计划数量:'
        end
        object Label19: TLabel
          Left = 10
          Top = 269
          Width = 30
          Height = 12
          Caption = '批号:'
        end
        object Label20: TLabel
          Left = 10
          Top = 243
          Width = 54
          Height = 12
          Caption = '在制货位:'
        end
        object Label32: TLabel
          Left = 10
          Top = 141
          Width = 54
          Height = 12
          Caption = '产品名称:'
        end
        object Label1: TLabel
          Left = 10
          Top = 39
          Width = 42
          Height = 12
          Caption = '工单号:'
        end
        object Label23: TLabel
          Left = 10
          Top = 218
          Width = 54
          Height = 12
          Caption = '计划工时:'
        end
        object seWnCode: TSDEdit
          Left = 63
          Top = 9
          Width = 138
          Height = 18
          Ctl3D = False
          Enabled = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 0
          Text = 'seWnCode'
          SplitSymbol = ' | '
        end
        object deWnDate: TDateEdit
          Left = 63
          Top = 61
          Width = 86
          Height = 18
          LineOffset = 2
          LineColor = clGreen
          LineVisible = False
          CDate = '2003-02-27'
          InitDate = '2003-02-27 15:16:35'
          ModalResult = 0
          TabOrder = 2
          Color = 50331647
          Ctl3D = False
          ParentCtl3D = False
        end
        object scWnProcess: TSDComboBox
          Left = 63
          Top = 85
          Width = 161
          Height = 20
          Ctl3D = False
          Enabled = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 3
          Text = 'scWnProcess'
          KeyItem = cbItem2
        end
        object scWnUnit: TSDComboBox
          Left = 63
          Top = 160
          Width = 108
          Height = 20
          Ctl3D = False
          Enabled = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 5
          Text = 'scWnUnit'
          KeyItem = cbItem2
        end
        object GroupBox1: TGroupBox
          Left = 4
          Top = 283
          Width = 162
          Height = 111
          TabOrder = 10
          object Label10: TLabel
            Left = 5
            Top = 16
            Width = 66
            Height = 12
            Caption = '计划开始日:'
          end
          object Label11: TLabel
            Left = 5
            Top = 41
            Width = 66
            Height = 12
            Caption = '计划结束日:'
          end
          object Label12: TLabel
            Left = 5
            Top = 66
            Width = 66
            Height = 12
            Caption = '实际开始日:'
          end
          object Label13: TLabel
            Left = 5
            Top = 91
            Width = 66
            Height = 12
            Caption = '实际结束日:'
          end
          object deWnPsDate: TDateEdit
            Left = 70
            Top = 13
            Width = 86
            Height = 18
            LineOffset = 2
            LineColor = clGreen
            LineVisible = False
            CDate = '2003-02-27'
            InitDate = '2003-02-27 15:16:35'
            ModalResult = 0
            Enabled = False
            TabOrder = 0
            Color = 50331647
            Ctl3D = False
            ParentCtl3D = False
          end
          object deWnRsDate: TDateEdit
            Left = 70
            Top = 63
            Width = 86
            Height = 18
            LineOffset = 2
            LineColor = clGreen
            LineVisible = False
            CDate = '2003-02-27'
            InitDate = '2003-02-27 15:16:35'
            ModalResult = 0
            TabOrder = 2
            Color = 50331647
            Ctl3D = False
            ParentCtl3D = False
          end
          object deWnPeDate: TDateEdit
            Left = 70
            Top = 38
            Width = 86
            Height = 18
            LineOffset = 2
            LineColor = clGreen
            LineVisible = False
            CDate = '2003-02-27'
            InitDate = '2003-02-27 15:16:35'
            ModalResult = 0
            Enabled = False
            TabOrder = 1
            Color = 50331647
            Ctl3D = False
            ParentCtl3D = False
          end
          object deWnReDate: TDateEdit
            Left = 70
            Top = 88
            Width = 85
            Height = 18
            LineOffset = 2
            LineColor = clGreen
            LineVisible = False
            CDate = '2003-02-27'
            InitDate = '2003-02-27 15:16:35'
            ModalResult = 0
            TabOrder = 3
            Color = 50331647
            Ctl3D = False
            ParentCtl3D = False
          end
        end
        object scWnLoc: TSDComboBox
          Left = 63
          Top = 237
          Width = 174
          Height = 20
          Ctl3D = False
          Enabled = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 8
          Text = 'scWnLoc'
          KeyItem = cbItem2
        end
        object scWnBatch: TSDComboBox
          Left = 63
          Top = 262
          Width = 174
          Height = 20
          Ctl3D = False
          Enabled = False
          ItemHeight = 12
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 9
          Text = 'scWnBatch'
          KeyItem = cbItem2
        end
        object seWnPQty: TSDEdit
          Left = 63
          Top = 186
          Width = 121
          Height = 18
          Ctl3D = False
          Enabled = False
          ParentColor = True
          ParentCtl3D = False
          TabOrder = 6
          Text = 'seWnPQty'
          SplitSymbol = ' | '
        end
        object GroupBox2: TGroupBox
          Left = 165
          Top = 283
          Width = 145
          Height = 111
          TabOrder = 11
          object Label28: TLabel
            Left = 4
            Top = 17
            Width = 54
            Height = 12
            Caption = '加工费率:'
          end
          object Label29: TLabel
            Left = 4
            Top = 41
            Width = 54
            Height = 12
            Caption = '计件单价:'
          end
          object Label30: TLabel
            Left = 4
            Top = 65
            Width = 54
            Height = 12
            Caption = '加班费率:'
          end
          object Label31: TLabel
            Left = 4
            Top = 89
            Width = 54
            Height = 12
            Caption = '外协费率:'
          end
          object seWnPer: TSDEdit
            Left = 57
            Top = 12
            Width = 81
            Height = 18
            Ctl3D = False
            Enabled = False
            ParentColor = True
            ParentCtl3D = False
            TabOrder = 0