⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 unit_modechan.dfm

📁 此代码为企业原料管理代码
💻 DFM
📖 第 1 页 / 共 3 页
字号:
        Glyph.Data = {
          F6040000424DF604000000000000360000002800000015000000130000000100
          180000000000C0040000C40E0000C40E00000000000000000000FFFFFFFFFFFF
          FFFFFF7F7F7FFFFFFF7F7F7FFFFFFF7F7F7FFFFFFF7F7F7FFFFFFF7F7F7FFFFF
          FF7F7F7FFFFFFF7F7F7FFFFFFF7F7F7FFFFFFF7F7F7FFFFFFF00FFFFFFFFFFFF
          0000000000000000000000000000000000000000000000000000000000000000
          00000000000000000000000000000000000000000000FFFFFF00FFFFFF7F7F7F
          000000FFFFFF0000FF0000FFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFF00007F00007FFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFF0000FF0000FFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFF00007F00007FFFFFFFFFFFFFFFFFFF00FFFFFF7F7F7F
          000000FFFFFF0000FF0000FFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFF00007F00007FFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFF0000FF0000FFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFF7F7F7F
          000000FFFFFF0000FF0000FFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFFFFFFFFFFFFFFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFF7F7F7F
          000000FFFFFFFFFFFFFFFFFFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFFFFFFFFFFFFFFFFFFFFFF0000FF0000FFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFF7F7F7F
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F00007F00FFFF
          FFFFFF00FFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFF7F7F7F
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F00007F00FFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007F00007F00FFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFF7F7F7F
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFF7F7F7F
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00FFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00}
      end
    end
    object TabSheet2: TTabSheet
      Caption = '某个产品整修质量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ImageIndex = 1
      ParentFont = False
      OnExit = TabSheet2Exit
      object DBGrid2: TDBGrid
        Left = 3
        Top = 77
        Width = 753
        Height = 310
        DataSource = DataSourcetableone
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = '宋体'
        Font.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
        ParentFont = False
        TabOrder = 0
        TitleFont.Charset = GB2312_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -15
        TitleFont.Name = '宋体'
        TitleFont.Style = []
        Columns = <
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'TMonth'
            Title.Alignment = taCenter
            Title.Caption = '月份'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 47
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'TDate'
            Title.Alignment = taCenter
            Title.Caption = '日 期 '
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 76
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'Prodname'
            Title.Alignment = taCenter
            Title.Caption = '产品名称'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'FigID'
            Title.Alignment = taCenter
            Title.Caption = '图  号'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 91
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Elsenum'
            Title.Alignment = taCenter
            Title.Caption = '领坯数/只'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 62
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Qcnum'
            Title.Alignment = taCenter
            Title.Caption = '合格品数/只'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Wasternum'
            Title.Alignment = taCenter
            Title.Caption = '废品数/只'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 65
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Qcper'
            Title.Alignment = taCenter
            Title.Caption = '合格率%'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 51
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'WasterPer'
            Title.Alignment = taCenter
            Title.Caption = '胶料损耗/克'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 75
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Wastermoney'
            Title.Alignment = taCenter
            Title.Caption = '成本损耗/元'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 74
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Lacknum'
            Title.Alignment = taCenter
            Title.Caption = '修废/只'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 48
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = 'Impunum'
            Title.Alignment = taCenter
            Title.Caption = '硫废/只'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Width = 51
            Visible = True
          end
          item
            Alignment = taCenter
            Expanded = False
            FieldName = '生产批号'
            Title.Font.Charset = GB2312_CHARSET
            Title.Font.Color = clWindowText
            Title.Font.Height = -13
            Title.Font.Name = '宋体'
            Title.Font.Style = []
            Visible = False
          end>
      end
      object GroupBox2: TGroupBox
        Left = 5
        Top = 0
        Width = 751
        Height = 72
        Font.Charset = GB2312_CHARSET
        Font.Color = clPurple
        Font.Height = -12
        Font.Name = '宋体'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        object Panel4: TPanel
          Left = 168
          Top = 15
          Width = 42
          Height = 21
          Caption = '日期从'
          TabOrder = 0
        end
        object Panel7: TPanel
          Left = 168
          Top = 43
          Width = 44
          Height = 21
          Caption = '日期到'
          TabOrder = 1
        end
        object DateTimePicker3: TDateTimePicker
          Left = 211
          Top = 15
          Width = 127
          Height = 20
          CalAlignment = dtaLeft
          Date = 36951.425228125
          Time = 36951.425228125
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 2
          TabStop = False
        end
        object DateTimePicker4: TDateTimePicker
          Left = 211
          Top = 42
          Width = 127
          Height = 20
          CalAlignment = dtaLeft
          Date = 37010.4254512731
          Time = 37010.4254512731
          DateFormat = dfShort
          DateMode = dmComboBox
          Kind = dtkDate
          ParseInput = False
          TabOrder = 3
          TabStop = False
        end
        object Panel8: TPanel
          Left = 353
          Top = 15
          Width = 78
          Height = 47
          BevelInner = bvLowered
          TabOrder = 4
          object RBDate: TRadioButton
            Left = 13
            Top = 8
            Width = 59
            Height = 14
            Caption = '日统计'
            Checked = True
            TabOrder = 0
            TabStop = True
            OnClick = RBDateClick
          end
          object RBMonth: TRadioButton
            Left = 12
            Top = 28
            Width = 59
            Height = 17
            Caption = '月统计'
            TabOrder = 1
            OnClick = RBDateClick
          end
        end
        object bbserchone: TBitBtn
          Left = 442
          Top = 12
          Width = 75
          Height = 25
          Caption = '查询'
          TabOrder = 5
          OnClick = bbserchoneClick
          Kind = bkOK
        end
        object BitBtn3: TBitBtn
          Left = 443
          Top = 41
          Width = 75
          Height = 25
          Cancel = True
          Caption = '关闭'
          TabOrder = 6
          OnClick = BitBtn3Click
          Glyph.Data = {
            DE010000424DDE01000000000000760000002800000024000000120000000100
            0400000000006801000000000000000000001000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
            F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
            000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
            338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
            45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
            3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
            F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
            000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
            338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
            4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
            8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
            333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
            0000}
          NumGlyphs = 2
        end
        object bbchartone: TBitBtn
          Left = 535
          Top = 40
          Width = 110
          Height = 25
          Caption = '图表显示'

⌨️ 快捷键说明

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