qcshw.dfm

来自「科思ERP部分源码及控件」· DFM 代码 · 共 850 行 · 第 1/2 页

DFM
850
字号
        Height = 12
        Caption = '行状态:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 10
        Top = 46
        Width = 78
        Height = 12
        Caption = '送检单据行号:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label6: TLabel
        Left = 10
        Top = 71
        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 = 157
        Top = 147
        Width = 54
        Height = 12
        Caption = '实检数量:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label28: TLabel
        Left = 10
        Top = 97
        Width = 54
        Height = 12
        Caption = '货物名称:'
      end
      object Label14: TLabel
        Left = 218
        Top = 97
        Width = 30
        Height = 12
        Caption = '规格:'
      end
      object seQcsdLine: TSDEdit
        Left = 68
        Top = 16
        Width = 143
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 0
        Text = 'seQcsdLine'
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
      object seQcsdDQty: TSDEdit
        Left = 63
        Top = 143
        Width = 88
        Height = 18
        Ctl3D = False
        Enabled = False
        MaxLength = 13
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 2
        Text = '0'
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object scQcsdTrd: TSDComboBox
        Left = 63
        Top = 117
        Width = 143
        Height = 20
        Color = clWhite
        Ctl3D = False
        Enabled = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 1
        Text = 'scQcsdTrd'
        KeyItem = cbItem2
        ReadOnly = True
      end
      object scQcsdState: TSDComboBox
        Left = 63
        Top = 168
        Width = 143
        Height = 20
        Style = csDropDownList
        Color = clWhite
        Ctl3D = False
        Enabled = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 4
        KeyItem = cbItem2
        ReadOnly = True
      end
      object seQcsdCQty: TSDEdit
        Left = 211
        Top = 142
        Width = 95
        Height = 18
        Ctl3D = False
        MaxLength = 13
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 3
        Text = '0'
        OnExit = seQcsdCQtyExit
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seQcsdFLine: TSDEdit
        Left = 94
        Top = 43
        Width = 114
        Height = 18
        Ctl3D = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 5
        Text = 'seQcsdFLine'
        CharType = ctNumeric
        SplitSymbol = ' | '
      end
      object seQcsdGoods: TSDEdit
        Left = 68
        Top = 68
        Width = 238
        Height = 18
        Ctl3D = False
        Enabled = False
        ParentColor = True
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 6
        Text = 'seQcsdGoods'
        OnButtonClick = seQcsdGoodsButtonClick
        ButtonVisible = True
        SplitSymbol = ' | '
      end
      object seQcsdGoodsName: TSDEdit
        Tag = 1
        Left = 65
        Top = 94
        Width = 146
        Height = 18
        Ctl3D = False
        Enabled = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 7
        Text = 'seQcsdGoodsName'
        SplitSymbol = ' | '
      end
      object seQcsdGoodsSpec: TSDEdit
        Tag = 1
        Left = 248
        Top = 94
        Width = 58
        Height = 18
        Ctl3D = False
        Enabled = False
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 8
        Text = 'seQcsdGoodsSpec'
        SplitSymbol = ' | '
      end
    end
    object btnOK: TBitBtn
      Left = 643
      Top = 13
      Width = 93
      Height = 26
      Caption = '确定'
      ModalResult = 1
      TabOrder = 2
      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 = 643
      Top = 45
      Width = 93
      Height = 27
      Caption = '取消'
      ModalResult = 2
      TabOrder = 3
      OnClick = btnCancelClick
      Glyph.Data = {
        DE010000424DDE01000000000000760000002800000024000000120000000100
        0400000000006801000000000000000000001000000000000000000000000000
        80000080000000808000800000008000800080800000C0C0C000808080000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333333333000033338833333333333333333F333333333333
        0000333911833333983333333388F333333F3333000033391118333911833333
        38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
        911118111118333338F3338F833338F3000033333911111111833333338F3338
        3333F8330000333333911111183333333338F333333F83330000333333311111
        8333333333338F3333383333000033333339111183333333333338F333833333
        00003333339111118333333333333833338F3333000033333911181118333333
        33338333338F333300003333911183911183333333383338F338F33300003333
        9118333911183333338F33838F338F33000033333913333391113333338FF833
        38F338F300003333333333333919333333388333338FFF830000333333333333
        3333333333333333333888330000333333333333333333333333333333333333
        0000}
      NumGlyphs = 2
    end
    object GroupBox4: TGroupBox
      Left = 340
      Top = 4
      Width = 280
      Height = 195
      Caption = '质检结果'
      TabOrder = 1
      object Label12: TLabel
        Left = 11
        Top = 94
        Width = 90
        Height = 12
        Caption = '不合格处理方式:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label13: TLabel
        Left = 10
        Top = 128
        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 = 10
        Top = 23
        Width = 54
        Height = 12
        Caption = '合格数量:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object Label19: TLabel
        Left = 10
        Top = 58
        Width = 66
        Height = 12
        Caption = '不合格数量:'
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlack
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
      end
      object scQcsdMode: TSDComboBox
        Left = 104
        Top = 91
        Width = 149
        Height = 20
        Style = csDropDownList
        Color = clWhite
        Ctl3D = False
        Enabled = False
        ItemHeight = 12
        ParentCtl3D = False
        TabOrder = 2
        KeyItem = cbItem2
        ReadOnly = True
      end
      object memQcsdDesc: TMemo
        Left = 46
        Top = 131
        Width = 219
        Height = 48
        Color = clWhite
        Ctl3D = False
        Lines.Strings = (
          '')
        ParentCtl3D = False
        TabOrder = 3
      end
      object seQcsdYQty: TSDEdit
        Left = 77
        Top = 18
        Width = 156
        Height = 18
        Ctl3D = False
        MaxLength = 13
        ParentColor = True
        ParentCtl3D = False
        TabOrder = 0
        Text = '0'
        OnExit = seQcsdYQtyExit
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
      object seQcsdNQty: TSDEdit
        Left = 77
        Top = 57
        Width = 157
        Height = 18
        Ctl3D = False
        Enabled = False
        MaxLength = 13
        ParentColor = True
        ParentCtl3D = False
        ReadOnly = True
        TabOrder = 1
        Text = '0'
        DigLen = 4
        DataType = dtNumber
        CharType = ctMathematic
        SplitSymbol = ' | '
        DefaultValue = '0'
      end
    end
  end
  inherited sbBar: TStatusBar
    Top = 416
    Width = 764
    Height = 23
  end
  inherited CoolBar1: TCoolBar
    Width = 764
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 764
      end>
    inherited tbMainBar: TToolBar
      Width = 751
    end
  end
  inherited MainMenu1: TMainMenu
    Left = 657
    Top = 309
    inherited muFile: TMenuItem
      inherited muAddDetail: TMenuItem
        Visible = False
      end
    end
  end
  inherited ImageList1: TImageList
    Left = 701
    Top = 286
  end
  inherited BillPrintDlg: TPrintDialog
    Left = 666
    Top = 253
  end
  inherited BillPrnSetupDlg: TPrinterSetupDialog
    Left = 727
    Top = 245
  end
  inherited pmDetail: TPopupMenu
    Left = 698
    Top = 246
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?