mfch.dfm

速达开源ERP系统

inherited frmMfch: TfrmMfch
  Left = 243
  Top = 165
  Width = 700
  Height = 531
  Caption = '制造费用分摊'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object FloatPanel2: TFloatPanel [0]
    Left = 0
    Top = 129
    Width = 692
    Height = 301
    Align = alClient
    Color = clWhite
    Caption = 'FloatPanel2'
    ParentColor = False
    TabOrder = 4
    object GroupBox1: TGroupBox
      Left = 4
      Top = 1
      Width = 550
      Height = 286
      TabOrder = 0
      object Label18: TLabel
        Left = 14
        Top = 25
        Width = 30
        Height = 12
        Caption = '行号:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label11: TLabel
        Left = 270
        Top = 24
        Width = 54
        Height = 12
        Caption = '分摊金额:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label35: TLabel
        Left = 270
        Top = 60
        Width = 42
        Height = 12
        Caption = '行备注:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 14
        Top = 69
        Width = 42
        Height = 12
        Caption = '工单号:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label5: TLabel
        Left = 15
        Top = 113
        Width = 42
        Height = 12
        Caption = '费用名:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 15
        Top = 160
        Width = 30
        Height = 12
        Caption = '状态:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object seMfcdLine: TSDEdit
        Left = 71
        Top = 18
        Width = 99
        Height = 18
        Ctl3D = False
        MaxLength = 8
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 0
        Text = 'seMfcdLine'
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
      object seMfcdAmt: TSDEdit
        Left = 328
        Top = 18
        Width = 164
        Height = 18
        Ctl3D = False
        MaxLength = 13
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 1
        Text = '0'
        DigLen = 2
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object memMfcdDesc: TMemo
        Left = 328
        Top = 57
        Width = 196
        Height = 62
        Color = clWhite
        Ctl3D = False
        Lines.Strings = (
          'memMfcdDesc')
        ParentCtl3D = False
        TabOrder = 2
      end
      object seMfcdWoCode: TSDEdit
        Left = 71
        Top = 63
        Width = 180
        Height = 18
        Ctl3D = False
        MaxLength = 8
        ParentColor = True
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 3
        Text = 'seMfcdWoCode'
        OnButtonClick = seMfcdWoCodeButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
      end
      object scMfcdExpense: TSDComboBox
        Left = 67
        Top = 106
        Width = 169
        Height = 20
        Color = clWhite
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 4
        Text = 'scMfcdExpense'
        KeyItem = cbItem2
      end
      object scMfcdState: TSDComboBox
        Left = 67
        Top = 153
        Width = 169
        Height = 20
        Color = clWhite
        Ctl3D = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 5
        Text = 'scMfcdState'
        KeyItem = cbItem2
      end
    end
    object btnOK: TBitBtn
      Left = 564
      Top = 17
      Width = 93
      Height = 26
      Caption = '确定(&O)'
      ModalResult = 1
      TabOrder = 1
      OnClick = btnOKClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333333333333333330000333333333333333333333333F33333333333
        00003333344333333333333333388F3333333333000033334224333333333333
        338338F3333333330000333422224333333333333833338F3333333300003342
        222224333333333383333338F3333333000034222A22224333333338F338F333
        8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
        33333338F83338F338F33333000033A33333A222433333338333338F338F3333
        0000333333333A222433333333333338F338F33300003333333333A222433333
        333333338F338F33000033333333333A222433333333333338F338F300003333
        33333333A222433333333333338F338F00003333333333333A22433333333333
        3338F38F000033333333333333A223333333333333338F830000333333333333
        333A333333333333333338330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object btnCancel: TBitBtn
      Left = 564
      Top = 46
      Width = 94
      Height = 26
      Caption = '取消(&C)'
      ModalResult = 2
      TabOrder = 2
      OnClick = btnCancelClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333000033338833333333333333333F333333333333
        0000333911833333983333333388F333333F3333000033391118333911833333
        38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
        911118111118333338F3338F833338F3000033333911111111833333338F3338
        3333F8330000333333911111183333333338F333333F83330000333333311111
        8333333333338F3333383333000033333339111183333333333338F333833333
        00003333339111118333333333333833338F3333000033333911181118333333
        33338333338F333300003333911183911183333333383338F338F33300003333
        9118333911183333338F33838F338F33000033333913333391113333338FF833
        38F338F300003333333333333919333333388333338FFF830000333333333333
        3333333333333333333888330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
  end
  object sgMfch: TSDGrid [1]
    Left = 0
    Top = 129
    Width = 692
    Height = 301
    Align = alClient
    Color = clWhite
    Ctl3D = False
    DefaultRowHeight = 23
    FixedColor = 8564917
    FixedCols = 0
    RowCount = 4
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    ParentFont = False
    PopupMenu = pmDetail
    TabOrder = 3
    OnDblClick = sgMfchDblClick
    OnSelectCell = sgMfchSelectCell
    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 = (
      38
      156
      162
      93
      169)
  end
  inherited sbBar: TStatusBar
    Top = 463
    Width = 692
  end
  inherited CoolBar1: TCoolBar
    Width = 692
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 692
      end>
    inherited tbMainBar: TToolBar
      Width = 679
      inherited tbClose: TToolButton
        Visible = True
      end
    end
  end
  object FloatPanel1: TFloatPanel [4]
    Left = 0
    Top = 39
    Width = 692
    Height = 90
    Align = alTop
    Color = clWhite
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 2
    object Label1: TLabel
      Left = 16
      Top = 20
      Width = 54
      Height = 12
      Caption = '分摊单号:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 256
      Top = 20
      Width = 54
      Height = 12
      Caption = '分摊日期:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 256
      Top = 54
      Width = 54
      Height = 12
      Caption = '系统日期:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object labMfchSysDate: TLabel
      Left = 318
      Top = 53
      Width = 60
      Height = 12
      Caption = 'SystemDate'
      Font.Charset = GB2312_CHARSET
      Font.Color = clNavy
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 17
      Top = 56
      Width = 54
      Height = 12
      Caption = '财务月份:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 457
      Top = 9
      Width = 42
      Height = 12
      Caption = '单备注:'
      Font.Charset = GB2312_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object seMfchCode: TSDEdit
      Left = 75
      Top = 15
      Width = 116
      Height = 18
      Ctl3D = False
      ParentColor = True
      ParentCtl3D = False
      TabOrder = 0
      Text = 'seMfchCode'
      OnExit = seMfchCodeExit
      SplitSymbol = ' | '
    end
    object deMfchDate: TDateEdit
      Left = 315
      Top = 16
      Width = 92
      Height = 18
      LineOffset = 2
      LineColor = clGreen
      LineVisible = False
      CDate = '2001-05-11'
      InitDate = '2001-05-11'
      ModalResult = 0
      TabOrder = 1
      Color = 50331647
      Ctl3D = False
      ParentCtl3D = False
    end
    object scMfchFmonth: TSDComboBox
      Left = 73
      Top = 50
      Width = 118
      Height = 20
      Color = clWhite
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 2
      Text = 'scMfchFmonth'
      KeyItem = cbItem2
    end
    object memMfchDesc: TMemo
      Left = 457
      Top = 27
      Width = 183
      Height = 44
      Color = clWhite
      Ctl3D = False
      Lines.Strings = (
        'memMfchDesc')
      ParentCtl3D = False
      TabOrder = 3
    end
  end
  object FloatPanel3: TFloatPanel [5]
    Left = 0
    Top = 430
    Width = 692
    Height = 33
    Align = alBottom
    Color = clWhite
    Enabled = False
    Caption = 'FloatPanel3'
    ParentColor = False
    TabOrder = 5
    object Label13: TLabel
      Left = 381
      Top = 9
      Width = 48
      Height = 12
      Caption = '审核人：'
    end
    object labMfchChecker: TLabel
      Left = 430
      Top = 9
      Width = 84
      Height = 12
      Caption = 'labMfchChecker'
    end
    object Label10: TLabel
      Left = 549
      Top = 9
      Width = 48
      Height = 12
      Caption = '操作员：'
    end
    object labMfchUser: TLabel
      Left = 598
      Top = 9
      Width = 66
      Height = 12
      Caption = 'labMfchUser'
    end
    object cbxMfchCheck: TCheckBox
      Left = 123
      Top = 6
      Width = 69
      Height = 17
      Caption = '单已审核'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 631
    Top = 335
  end
  inherited ImageList1: TImageList
    Left = 631
    Top = 242
  end
  inherited BillPrintDlg: TPrintDialog
    Left = 631
    Top = 273
  end
  inherited BillPrnSetupDlg: TPrinterSetupDialog
    Left = 631
    Top = 304
  end
  inherited pmDetail: TPopupMenu
    Left = 631
    Top = 366
  end
end