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

📄 unit_rubb_proccard.dfm

📁 此代码为企业原料管理代码
💻 DFM
📖 第 1 页 / 共 2 页
字号:
      Font.Style = []
      ParentFont = False
      TabOrder = 16
      OnEnter = DBEdit13Enter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit12: TDBEdit
      Left = 163
      Top = 120
      Width = 79
      Height = 22
      DataField = '配料日期'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 10
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit13: TDBEdit
      Left = 242
      Top = 120
      Width = 80
      Height = 22
      DataField = '配料人'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 11
      OnEnter = DBEdit13Enter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit14: TDBEdit
      Left = 322
      Top = 120
      Width = 88
      Height = 22
      TabStop = False
      DataField = '配料用料量'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 12
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit15: TDBEdit
      Left = 410
      Top = 120
      Width = 84
      Height = 22
      DataField = '配料检验员'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 13
      OnEnter = DBEdit13Enter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit16: TDBEdit
      Left = 494
      Top = 120
      Width = 74
      Height = 22
      DataField = '配料检验结论'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 14
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit17: TDBEdit
      Left = 322
      Top = 142
      Width = 88
      Height = 22
      DataField = '混炼用料量'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 17
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit18: TDBEdit
      Left = 410
      Top = 142
      Width = 84
      Height = 22
      DataField = '混炼检验员'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 18
      OnEnter = DBEdit13Enter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit19: TDBEdit
      Left = 163
      Top = 163
      Width = 79
      Height = 22
      DataField = '剪料日期'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 20
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit20: TDBEdit
      Left = 242
      Top = 163
      Width = 80
      Height = 22
      DataField = '剪料人'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 21
      OnEnter = DBEdit13Enter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit21: TDBEdit
      Left = 322
      Top = 163
      Width = 88
      Height = 22
      DataField = '剪料用料量'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 22
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit22: TDBEdit
      Left = 494
      Top = 142
      Width = 74
      Height = 22
      DataField = '混炼检验结论'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 19
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit23: TDBEdit
      Left = 410
      Top = 163
      Width = 84
      Height = 22
      DataField = '剪料检验员'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 23
      OnEnter = DBEdit13Enter
      OnExit = DBEdit_IgdCodeExit
    end
    object Panel20: TPanel
      Left = 3
      Top = 120
      Width = 64
      Height = 22
      Caption = '1'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 43
    end
    object Panel21: TPanel
      Left = 67
      Top = 120
      Width = 96
      Height = 22
      Caption = '配  料'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 44
    end
    object Panel22: TPanel
      Left = 3
      Top = 142
      Width = 64
      Height = 22
      Caption = '2'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 45
    end
    object Panel23: TPanel
      Left = 67
      Top = 142
      Width = 96
      Height = 22
      Caption = '混  炼'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 46
    end
    object Panel24: TPanel
      Left = 67
      Top = 164
      Width = 96
      Height = 22
      Caption = '剪  胶'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 47
    end
    object Panel25: TPanel
      Left = 3
      Top = 164
      Width = 64
      Height = 22
      Caption = '3'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 48
    end
    object DBEdit24: TDBEdit
      Left = 494
      Top = 163
      Width = 74
      Height = 22
      DataField = '剪料检验结论'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 24
      OnEnter = DBEdit_IgdCodeEnter
      OnExit = DBEdit_IgdCodeExit
    end
    object DBEdit25: TDBEdit
      Left = 489
      Top = 32
      Width = 79
      Height = 22
      DataField = '编号'
      DataSource = DS_ProcCard
      ReadOnly = True
      TabOrder = 2
      OnEnter = DBEdit25Enter
      OnExit = DBEdit25Exit
    end
    object dbePrice: TDBEdit
      Left = 255
      Top = 76
      Width = 62
      Height = 22
      DataField = '单价'
      DataSource = DS_ProcCard
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 49
    end
    object Panel105: TPanel
      Left = 255
      Top = 54
      Width = 62
      Height = 22
      Caption = '胶料单价'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 50
    end
    object ComboBox1: TComboBox
      Left = 67
      Top = 10
      Width = 142
      Height = 22
      Style = csDropDownList
      ItemHeight = 14
      TabOrder = 51
      OnChange = ComboBox1Change
    end
  end
  object BitBtn1: TBitBtn
    Left = 253
    Top = 247
    Width = 105
    Height = 25
    Caption = '填写打印报告单'
    TabOrder = 1
    TabStop = False
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 374
    Top = 247
    Width = 105
    Height = 26
    Caption = '填写用料单'
    TabOrder = 2
    TabStop = False
    OnClick = BitBtn2Click
  end
  object BitBtn3: TBitBtn
    Left = 496
    Top = 247
    Width = 75
    Height = 25
    Caption = '完成'
    TabOrder = 3
    OnClick = BitBtn3Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object Panel26: TPanel
    Left = 12
    Top = 12
    Width = 577
    Height = 36
    Caption = '宁 波 市 巨 龙 橡 塑 有 限 公 司'
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -20
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
  end
  object BitBtn4: TBitBtn
    Left = 160
    Top = 248
    Width = 75
    Height = 25
    Cancel = True
    Caption = '退出(ESC)'
    TabOrder = 5
    OnClick = BitBtn4Click
  end
  object DS_ProcCard: TDataSource
    DataSet = Tab_ProcCard
    Left = 31
    Top = 168
  end
  object Tab_ProcCard: TTable
    DatabaseName = 'JL2000'
    TableName = '炼胶工艺卡.DB'
    Left = 63
    Top = 168
  end
  object Query1: TQuery
    DatabaseName = 'JL2000'
    Left = 151
    Top = 66
  end
end

⌨️ 快捷键说明

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