unit_jihua.dfm

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

      TabOrder = 13
    end
  end
  object Panel1: TPanel
    Left = 289
    Top = 36
    Width = 273
    Height = 200
    TabOrder = 6
    object Label2: TLabel
      Left = 66
      Top = 4
      Width = 144
      Height = 24
      Caption = '计划用料情况'
      Font.Charset = GB2312_CHARSET
      Font.Color = clFuchsia
      Font.Height = -24
      Font.Name = '隶书'
      Font.Style = []
      ParentFont = False
    end
    object Edit_MixCardNum: TEdit
      Left = 96
      Top = 35
      Width = 148
      Height = 23
      TabStop = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnChange = Edit_MixCardNumChange
    end
    object Edit_Rubbmi: TEdit
      Left = 96
      Top = 56
      Width = 148
      Height = 23
      TabStop = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
    end
    object Edit_Per: TEdit
      Left = 96
      Top = 116
      Width = 57
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnChange = Edit_PerChange
      OnEnter = Edit1_shehaoEnter
      OnExit = Edit_dinghaoExit
    end
    object Panel3: TPanel
      Left = 19
      Top = 56
      Width = 77
      Height = 20
      Caption = '胶料名称'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
    end
    object Panel_Hint: TPanel
      Left = 19
      Top = 35
      Width = 77
      Height = 21
      Caption = '配方编号'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
    end
    object Panel5: TPanel
      Left = 19
      Top = 96
      Width = 77
      Height = 20
      Caption = '弹簧规格'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      object TEdit
        Left = 80
        Top = 0
        Width = 121
        Height = 23
        TabOrder = 0
      end
    end
    object Panel9: TPanel
      Left = 19
      Top = 76
      Width = 77
      Height = 20
      Caption = '胶料总量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
    end
    object edit_tanhu: TEdit
      Left = 188
      Top = 99
      Width = 57
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 8
    end
    object Panel10: TPanel
      Left = 155
      Top = 98
      Width = 34
      Height = 19
      Caption = '数量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 9
    end
    object Panel14: TPanel
      Left = 152
      Top = 117
      Width = 38
      Height = 20
      Caption = '数量'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 10
    end
    object eTotal: TEdit
      Left = 96
      Top = 76
      Width = 148
      Height = 23
      TabStop = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 11
    end
    object Edit4: TEdit
      Left = 96
      Top = 96
      Width = 57
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnChange = Edit4Change
      OnEnter = Edit1_shehaoEnter
      OnExit = Edit_dinghaoExit
    end
    object Panel15: TPanel
      Left = 19
      Top = 116
      Width = 77
      Height = 21
      Caption = '骨架规格'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 12
      object Panel16: TPanel
        Left = 0
        Top = 24
        Width = 185
        Height = 41
        Caption = 'Panel16'
        TabOrder = 0
      end
    end
    object edit_gujia: TEdit
      Left = 189
      Top = 118
      Width = 56
      Height = 21
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 13
    end
    object Panel17: TPanel
      Left = 19
      Top = 137
      Width = 77
      Height = 22
      Caption = '材料总值'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 14
    end
    object Edit6: TEdit
      Left = 96
      Top = 137
      Width = 149
      Height = 23
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 15
    end
    object DateTimePicker1: TDateTimePicker
      Left = 96
      Top = 159
      Width = 150
      Height = 23
      CalAlignment = dtaLeft
      Date = 37485.867593287
      Time = 37485.867593287
      DateFormat = dfShort
      DateMode = dmComboBox
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      Kind = dtkDate
      ParseInput = False
      ParentFont = False
      TabOrder = 16
    end
    object Panel18: TPanel
      Left = 19
      Top = 159
      Width = 77
      Height = 24
      Caption = '制定日期'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 17
    end
  end
  object Edit1: TEdit
    Left = 471
    Top = 392
    Width = 66
    Height = 23
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnEnter = Edit1Enter
  end
  object Edit2: TEdit
    Left = 40
    Top = 8
    Width = 40
    Height = 21
    TabOrder = 8
    Visible = False
  end
  object DS_TakeCard: TDataSource
    DataSet = Qry_TakeCard
    Left = 217
    Top = 41
  end
  object Qry_exe: TQuery
    DatabaseName = 'JL2000'
    Left = 17
    Top = 105
  end
  object TabIO: TTable
    DatabaseName = 'Jl2000'
    TableName = '原材料台帐.DB'
    Left = 249
    Top = 161
  end
  object Q1: TQuery
    Active = True
    DatabaseName = 'Jl2000'
    SQL.Strings = (
      'SELECT *FROM "jihuadan.DB" jihuadan')
    Left = 64
    Top = 30
  end
  object TabMater: TTable
    DatabaseName = 'Jl2000'
    TableName = 'jihuadan.DB'
    Left = 249
    Top = 193
  end
  object Query1: TQuery
    DatabaseName = 'JL2000'
    SQL.Strings = (
      'SELECT *FROM jihuadan.db ')
    Left = 33
    Top = 281
  end
  object Query2: TQuery
    DatabaseName = 'JL2000'
    Left = 289
    Top = 60
  end
  object Query3: TQuery
    DatabaseName = 'JL2000'
    Left = 273
    Top = 108
  end
  object Qry_TakeCard: TQuery
    DatabaseName = 'JL2000'
    SQL.Strings = (
      'SELECT 标识号, 配方编号, 制成品名称, 材料名称, 份数 as 重量'
      'FROM "炼胶配方表.DB" 炼胶配方表')
    Left = 249
    Top = 44
  end
end