unit_rubb_repcardnew.~dfm

此代码为企业原料管理代码

    object Label28: TLabel
      Left = 6
      Top = 14
      Width = 14
      Height = 14
      Caption = '其'
    end
    object Label29: TLabel
      Left = 6
      Top = 78
      Width = 14
      Height = 14
      Caption = '验'
    end
  end
  object Panel56: TPanel
    Left = 116
    Top = 392
    Width = 108
    Height = 20
    Caption = '臭氧试验'
    TabOrder = 88
  end
  object Panel48: TPanel
    Left = 116
    Top = 412
    Width = 108
    Height = 20
    Caption = '压缩永久变形'
    TabOrder = 89
  end
  object Panel49: TPanel
    Left = 116
    Top = 432
    Width = 108
    Height = 20
    Caption = '低温试验'
    TabOrder = 90
  end
  object Panel57: TPanel
    Left = 116
    Top = 472
    Width = 108
    Height = 20
    Caption = '比重试验'
    TabOrder = 91
  end
  object Panel58: TPanel
    Left = 116
    Top = 452
    Width = 108
    Height = 20
    Caption = '耐磨试验'
    TabOrder = 92
  end
  object Panel59: TPanel
    Left = 116
    Top = 312
    Width = 108
    Height = 20
    Caption = '硬度变化'
    TabOrder = 93
  end
  object Panel60: TPanel
    Left = 116
    Top = 332
    Width = 108
    Height = 20
    Caption = '扯断强度变化'
    TabOrder = 94
  end
  object Panel61: TPanel
    Left = 116
    Top = 352
    Width = 108
    Height = 20
    Caption = '扯断伸长变化'
    TabOrder = 95
  end
  object Panel62: TPanel
    Left = 116
    Top = 372
    Width = 108
    Height = 20
    Caption = '重量变化'
    TabOrder = 96
  end
  object Panel63: TPanel
    Left = 224
    Top = 272
    Width = 44
    Height = 20
    Caption = '%'
    TabOrder = 97
  end
  object Panel64: TPanel
    Left = 224
    Top = 292
    Width = 44
    Height = 20
    Caption = '%'
    TabOrder = 98
  end
  object Panel65: TPanel
    Left = 224
    Top = 392
    Width = 44
    Height = 20
    TabOrder = 99
  end
  object Panel66: TPanel
    Left = 70
    Top = 392
    Width = 46
    Height = 20
    Caption = '9'
    TabOrder = 100
  end
  object Panel67: TPanel
    Left = 70
    Top = 432
    Width = 46
    Height = 20
    Caption = '11'
    TabOrder = 101
  end
  object Panel68: TPanel
    Left = 70
    Top = 452
    Width = 46
    Height = 20
    Caption = '12'
    TabOrder = 102
  end
  object Panel69: TPanel
    Left = 70
    Top = 472
    Width = 46
    Height = 20
    Caption = '13'
    TabOrder = 103
  end
  object Panel70: TPanel
    Left = 70
    Top = 412
    Width = 46
    Height = 20
    Caption = '10'
    TabOrder = 104
  end
  object Panel71: TPanel
    Left = 224
    Top = 412
    Width = 44
    Height = 20
    TabOrder = 105
  end
  object Panel72: TPanel
    Left = 224
    Top = 432
    Width = 44
    Height = 20
    TabOrder = 106
  end
  object Panel73: TPanel
    Left = 224
    Top = 452
    Width = 44
    Height = 20
    TabOrder = 107
  end
  object Panel74: TPanel
    Left = 224
    Top = 472
    Width = 44
    Height = 20
    TabOrder = 108
  end
  object DBEdit1: TDBEdit
    Left = 268
    Top = 112
    Width = 67
    Height = 22
    DataField = '常规可塑度试验结果'
    DataSource = DS_RepCard
    TabOrder = 3
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit2: TDBEdit
    Left = 268
    Top = 131
    Width = 67
    Height = 22
    DataField = '常规硫化速度试验结果'
    DataSource = DS_RepCard
    TabOrder = 5
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit3: TDBEdit
    Left = 268
    Top = 151
    Width = 67
    Height = 22
    DataField = '常规邵尔A硬度试验结果'
    DataSource = DS_RepCard
    TabOrder = 7
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit4: TDBEdit
    Left = 268
    Top = 171
    Width = 67
    Height = 22
    DataField = '常规拉伸强度试验结果'
    DataSource = DS_RepCard
    TabOrder = 9
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit5: TDBEdit
    Left = 268
    Top = 191
    Width = 67
    Height = 22
    DataField = '常规扯断伸长率试验结果'
    DataSource = DS_RepCard
    TabOrder = 11
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit6: TDBEdit
    Left = 268
    Top = 211
    Width = 67
    Height = 22
    DataField = '常规扯断永久变形试验结果'
    DataSource = DS_RepCard
    TabOrder = 13
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit7: TDBEdit
    Left = 268
    Top = 231
    Width = 67
    Height = 22
    DataField = '热硬度变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 15
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit8: TDBEdit
    Left = 268
    Top = 251
    Width = 67
    Height = 22
    DataField = '热拉伸强度变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 16
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit9: TDBEdit
    Left = 268
    Top = 271
    Width = 67
    Height = 22
    DataField = '热扯断伸长率变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 17
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit10: TDBEdit
    Left = 268
    Top = 291
    Width = 67
    Height = 22
    DataField = '热重量变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 18
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit11: TDBEdit
    Left = 268
    Top = 311
    Width = 67
    Height = 22
    DataField = '耐油硬度变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 20
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit12: TDBEdit
    Left = 268
    Top = 331
    Width = 67
    Height = 22
    DataField = '耐油扯断强度变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 21
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit13: TDBEdit
    Left = 268
    Top = 351
    Width = 67
    Height = 22
    DataField = '耐油扯断伸长变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 22
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit14: TDBEdit
    Left = 268
    Top = 371
    Width = 67
    Height = 22
    DataField = '耐油重量变化试验结果'
    DataSource = DS_RepCard
    TabOrder = 23
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit15: TDBEdit
    Left = 268
    Top = 391
    Width = 67
    Height = 22
    DataField = '其它臭氧试验结果'
    DataSource = DS_RepCard
    TabOrder = 25
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit16: TDBEdit
    Left = 268
    Top = 411
    Width = 67
    Height = 22
    DataField = '其它压缩永久变形试验结果'
    DataSource = DS_RepCard
    TabOrder = 27
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit17: TDBEdit
    Left = 268
    Top = 431
    Width = 67
    Height = 22
    DataField = '其它低温试验结果'
    DataSource = DS_RepCard
    TabOrder = 29
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit18: TDBEdit
    Left = 268
    Top = 451
    Width = 67
    Height = 22
    DataField = '其它耐磨试验结果'
    DataSource = DS_RepCard
    TabOrder = 31
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit19: TDBEdit
    Left = 268
    Top = 471
    Width = 67
    Height = 22
    DataField = '其它比重试验结果'
    DataSource = DS_RepCard
    TabOrder = 33
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit20: TDBEdit
    Left = 335
    Top = 111
    Width = 217
    Height = 22
    DataField = '常规可塑度试验条件'
    DataSource = DS_RepCard
    TabOrder = 4
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit21: TDBEdit
    Left = 335
    Top = 131
    Width = 217
    Height = 22
    DataField = '常规硫化速度试验条件'
    DataSource = DS_RepCard
    TabOrder = 6
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit22: TDBEdit
    Left = 335
    Top = 151
    Width = 217
    Height = 22
    DataField = '常规邵尔A硬度试验条件'
    DataSource = DS_RepCard
    TabOrder = 8
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit23: TDBEdit
    Left = 335
    Top = 171
    Width = 217
    Height = 22
    DataField = '常规拉伸强度试验条件'
    DataSource = DS_RepCard
    TabOrder = 10
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit24: TDBEdit
    Left = 335
    Top = 191
    Width = 217
    Height = 22
    DataField = '常规扯断伸长率试验条件'
    DataSource = DS_RepCard
    TabOrder = 12
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit25: TDBEdit
    Left = 335
    Top = 211
    Width = 217
    Height = 22
    DataField = '常规扯断永久变形试验条件'
    DataSource = DS_RepCard
    TabOrder = 14
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit28: TDBEdit
    Left = 335
    Top = 391
    Width = 216
    Height = 22
    DataField = '其它臭氧试验条件'
    DataSource = DS_RepCard
    TabOrder = 26
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit29: TDBEdit
    Left = 335
    Top = 411
    Width = 216
    Height = 22
    DataField = '其它压缩永久变形试验条件'
    DataSource = DS_RepCard
    TabOrder = 28
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit30: TDBEdit
    Left = 335
    Top = 431
    Width = 216
    Height = 22
    DataField = '其它低温试验条件'
    DataSource = DS_RepCard
    TabOrder = 30
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit31: TDBEdit
    Left = 335
    Top = 451
    Width = 216
    Height = 22
    DataField = '其它耐磨试验条件'
    DataSource = DS_RepCard
    TabOrder = 32
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit32: TDBEdit
    Left = 335
    Top = 471
    Width = 216
    Height = 22
    DataField = '其它比重试验条件'
    DataSource = DS_RepCard
    TabOrder = 34
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit33: TDBEdit
    Left = 86
    Top = 51
    Width = 70
    Height = 22
    DataField = '配方编号'
    DataSource = DS_RepCard
    TabOrder = 0
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit34: TDBEdit
    Left = 488
    Top = 72
    Width = 63
    Height = 18
    AutoSize = False
    DataField = '试验日期'
    DataSource = DS_RepCard
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBEdit35: TDBEdit
    Left = 488
    Top = 52
    Width = 63
    Height = 19
    AutoSize = False
    DataField = '试验人'
    DataSource = DS_RepCard
    TabOrder = 2
    OnEnter = DBEdit35Enter
    OnExit = DBEdit33Exit
  end
  object DBMemo1: TDBMemo
    Left = 335
    Top = 231
    Width = 217
    Height = 81
    DataField = '热老化试验条件'
    DataSource = DS_RepCard
    TabOrder = 19
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object DBMemo2: TDBMemo
    Left = 335
    Top = 311
    Width = 217
    Height = 80
    DataField = '耐油试验条件'
    DataSource = DS_RepCard
    TabOrder = 24
    OnEnter = DBEdit33Enter
    OnExit = DBEdit33Exit
  end
  object BitBtn1: TBitBtn
    Left = 382
    Top = 506
    Width = 75
    Height = 25
    Caption = '提交'
    TabOrder = 35
    OnClick = BitBtn1Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      3333333333333333333333330000333333333333333333333333F33333333333
      00003333344333333333333333388F3333333333000033334224333333333333
      338338F3333333330000333422224333333333333833338F3333333300003342
      222224333333333383333338F3333333000034222A22224333333338F338F333
      8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
      33333338F83338F338F33333000033A33333A222433333338333338F338F3333
      0000333333333A222433333333333338F338F33300003333333333A222433333
      333333338F338F33000033333333333A222433333333333338F338F300003333
      33333333A222433333333333338F338F00003333333333333A22433333333333
      3338F38F000033333333333333A223333333333333338F830000333333333333
      333A333333333333333338330000333333333333333333333333333333333333
      0000}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 470
    Top = 506
    Width = 75
    Height = 25
    Caption = '返回'
    TabOrder = 109
    TabStop = False
    Kind = bkClose
  end
  object Panel75: TPanel
    Left = 19
    Top = 4
    Width = 532
    Height = 25
    Caption = '宁 波 市 巨 龙 橡 塑 有 限 公 司'
    Font.Charset = GB2312_CHARSET
    Font.Color = clRed
    Font.Height = -20
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 110
  end
  object Panel76: TPanel
    Left = 247
    Top = 73
    Width = 50
    Height = 19
    Caption = '编号：'
    TabOrder = 111
  end
  object DBEdit_ID: TDBEdit
    Left = 16
    Top = 496
    Width = 121
    Height = 22
    DataField = '标识号'
    DataSource = DS_RepCard
    TabOrder = 112
    Visible = False
  end
  object BitBtn3: TBitBtn
    Left = 200
    Top = 506
    Width = 155
    Height = 25
    Caption = '打印技术指标报告单'
    TabOrder = 113
    OnClick = BitBtn3Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      0003377777777777777308888888888888807F33333333333337088888888888
      88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
      8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
      8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object DBEdit26: TDBEdit
    Left = 296
    Top = 73
    Width = 63
    Height = 18
    AutoSize = False
    DataField = '编号'
    DataSource = DS_RepCard
    TabOrder = 114
  end
  object DBEdit27: TDBEdit
    Left = 86
    Top = 72
    Width = 70
    Height = 22
    DataField = '胶料名称'
    DataSource = DS_RepCard
    TabOrder = 115
  end
  object Panel77: TPanel
    Left = 19
    Top = 71
    Width = 67
    Height = 21
    Caption = '胶料名称'
    TabOrder = 116
  end
  object Tab_RepCard: TTable
    AutoCalcFields = False
    DatabaseName = 'JL2000'
    TableName = '炼胶指标报告单.DB'
    Left = 374
    Top = 271
  end
  object DS_RepCard: TDataSource
    DataSet = Tab_RepCard
    Left = 342
    Top = 271
  end
end