unit6.dfm

来自「delphi 考勤系统 没事做写的 在其他地方也能找到」· DFM 代码 · 共 138 行

DFM
138
字号
object Data1: TData1
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 501
  Top = 156
  Height = 279
  Width = 363
  object renyuan: TDataSource
    DataSet = renyuan1
    Left = 104
    Top = 8
  end
  object renyuan1: TTable
    TableName = 'ryxx.DB'
    Left = 56
    Top = 8
    object renyuan1BDEDesigner: TSmallintField
      FieldName = #21592#24037#21495
    end
    object renyuan1BDEDesigner2: TStringField
      FieldName = #22995#21517
      Size = 8
    end
    object renyuan1BDEDesigner3: TStringField
      FieldName = #37096#38376
      Size = 10
    end
  end
  object Query1: TQuery
    SQL.Strings = (
      'Select * from RYXX')
    Left = 184
    Top = 8
  end
  object chucai: TTable
    TableName = 'ccjl.DB'
    Left = 56
    Top = 64
    object chucaiBDEDesigner: TAutoIncField
      FieldName = #35760#24405#21495
      ReadOnly = True
    end
    object chucaiBDEDesigner2: TSmallintField
      FieldName = #21592#24037#21495
    end
    object chucaiBDEDesigner3: TDateField
      FieldName = #20986#24046#24320#22987#26102#38388
    end
    object chucaiBDEDesigner4: TDateField
      FieldName = #20986#24046#32467#26463#26102#38388
    end
  end
  object chucai1: TDataSource
    DataSet = chucai
    Left = 104
    Top = 64
  end
  object qinjia: TTable
    TableName = 'qjjl.DB'
    Left = 176
    Top = 64
    object qinjiaBDEDesigner: TAutoIncField
      FieldName = #35760#24405#21495
      ReadOnly = True
    end
    object qinjiaBDEDesigner2: TSmallintField
      FieldName = #21592#24037#21495
    end
    object qinjiaBDEDesigner3: TDateTimeField
      FieldName = #35831#20551#24320#22987#26102#38388
    end
    object qinjiaBDEDesigner4: TDateTimeField
      FieldName = #35831#20551#32467#26463#26102#38388
    end
    object qinjiaBDEDesigner5: TStringField
      FieldName = #35831#20551#21407#22240
    end
  end
  object qinjia1: TDataSource
    DataSet = qinjia
    Left = 216
    Top = 64
  end
  object jiaban: TTable
    TableName = 'jbjl.DB'
    Left = 176
    Top = 120
    object jiabanBDEDesigner: TAutoIncField
      FieldName = #35760#24405#21495
      ReadOnly = True
    end
    object jiabanBDEDesigner2: TSmallintField
      FieldName = #21592#24037#21495
    end
    object jiabanBDEDesigner3: TStringField
      FieldName = #21152#29677#26102#38388
      Size = 6
    end
    object jiabanBDEDesigner4: TDateField
      FieldName = #21152#29677#26085#26399
    end
  end
  object jiaban1: TDataSource
    DataSet = jiaban
    Left = 216
    Top = 120
  end
  object cqjl1: TDataSource
    DataSet = cqjl
    Left = 224
    Top = 176
  end
  object cqjl: TTable
    TableName = 'cqjl.DB'
    Left = 176
    Top = 176
    object cqjlBDEDesigner: TAutoIncField
      FieldName = #35760#24405#21495
      ReadOnly = True
    end
    object cqjlBDEDesigner2: TSmallintField
      FieldName = #21592#24037#21495
    end
    object cqjlBDEDesigner3: TStringField
      FieldName = #20986#20837#24773#20917
      Size = 2
    end
    object cqjlBDEDesigner4: TDateTimeField
      FieldName = #20986#20837#26102#38388
    end
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 232
    Top = 8
  end
end

⌨️ 快捷键说明

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