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

📄 guanliu.~dfm

📁 源代码竟供大家参考
💻 ~DFM
📖 第 1 页 / 共 3 页
字号:
  end
  object ADOQuery2: TADOQuery
    Connection = ADOConnection1
    Parameters = <
      item
        Name = 'StuID'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    Prepared = True
    SQL.Strings = (
      'select * from '#21333#36873#39064' where '#23398#21495'=:StuID')
    Left = 112
    Top = 112
    object ADOQuery2ID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOQuery2DSDesigner: TWideStringField
      FieldName = #23398#21495
    end
    object ADOQuery2DSDesigner2: TWideStringField
      FieldName = #39064#30446#20869#23481
      Size = 255
    end
    object ADOQuery2A: TWideStringField
      FieldName = 'A'
      Size = 50
    end
    object ADOQuery2B: TWideStringField
      FieldName = 'B'
      Size = 50
    end
    object ADOQuery2C: TWideStringField
      FieldName = 'C'
      Size = 50
    end
    object ADOQuery2D: TWideStringField
      FieldName = 'D'
      Size = 50
    end
    object ADOQuery2E: TWideStringField
      FieldName = 'E'
      Size = 50
    end
    object ADOQuery2F: TWideStringField
      FieldName = 'F'
      Size = 50
    end
    object ADOQuery2G: TWideStringField
      FieldName = 'G'
      Size = 50
    end
    object ADOQuery2H: TWideStringField
      FieldName = 'H'
      Size = 50
    end
    object ADOQuery2DSDesigner3: TWideStringField
      FieldName = #26631#20934#31572#26696
      Size = 1
    end
    object ADOQuery2DSDesigner4: TWideStringField
      FieldName = #23398#29983#31572#26696
      Size = 1
    end
  end
  object ADOQuery3: TADOQuery
    Connection = ADOConnection1
    Parameters = <
      item
        Name = 'StuID'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    Prepared = True
    SQL.Strings = (
      'select * from '#22797#36873#39064' where '#23398#21495'=:StuID')
    Left = 176
    Top = 112
    object ADOQuery3ID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOQuery3DSDesigner: TWideStringField
      FieldName = #23398#21495
    end
    object ADOQuery3DSDesigner2: TWideStringField
      FieldName = #39064#30446#20869#23481
      Size = 255
    end
    object ADOQuery3A: TWideStringField
      FieldName = 'A'
      Size = 50
    end
    object ADOQuery3B: TWideStringField
      FieldName = 'B'
      Size = 50
    end
    object ADOQuery3C: TWideStringField
      FieldName = 'C'
      Size = 50
    end
    object ADOQuery3D: TWideStringField
      FieldName = 'D'
      Size = 50
    end
    object ADOQuery3E: TWideStringField
      FieldName = 'E'
      Size = 50
    end
    object ADOQuery3F: TWideStringField
      FieldName = 'F'
      Size = 50
    end
    object ADOQuery3G: TWideStringField
      FieldName = 'G'
      Size = 50
    end
    object ADOQuery3H: TWideStringField
      FieldName = 'H'
      Size = 50
    end
    object ADOQuery3A2: TBooleanField
      FieldName = #26631#20934#31572#26696'A'
    end
    object ADOQuery3B2: TBooleanField
      FieldName = #26631#20934#31572#26696'B'
    end
    object ADOQuery3C2: TBooleanField
      FieldName = #26631#20934#31572#26696'C'
    end
    object ADOQuery3D2: TBooleanField
      FieldName = #26631#20934#31572#26696'D'
    end
    object ADOQuery3E2: TBooleanField
      FieldName = #26631#20934#31572#26696'E'
    end
    object ADOQuery3F2: TBooleanField
      FieldName = #26631#20934#31572#26696'F'
    end
    object ADOQuery3G2: TBooleanField
      FieldName = #26631#20934#31572#26696'G'
    end
    object ADOQuery3H2: TBooleanField
      FieldName = #26631#20934#31572#26696'H'
    end
    object ADOQuery3A3: TBooleanField
      FieldName = #23398#29983#31572#26696'A'
    end
    object ADOQuery3B3: TBooleanField
      FieldName = #23398#29983#31572#26696'B'
    end
    object ADOQuery3C3: TBooleanField
      FieldName = #23398#29983#31572#26696'C'
    end
    object ADOQuery3D3: TBooleanField
      FieldName = #23398#29983#31572#26696'D'
    end
    object ADOQuery3E3: TBooleanField
      FieldName = #23398#29983#31572#26696'E'
    end
    object ADOQuery3F3: TBooleanField
      FieldName = #23398#29983#31572#26696'F'
    end
    object ADOQuery3G3: TBooleanField
      FieldName = #23398#29983#31572#26696'G'
    end
    object ADOQuery3H3: TBooleanField
      FieldName = #23398#29983#31572#26696'H'
    end
  end
  object ADOQuery4: TADOQuery
    Connection = ADOConnection1
    Parameters = <
      item
        Name = 'StuID'
        Attributes = [paNullable]
        DataType = ftFixedChar
        NumericScale = 255
        Precision = 255
        Size = 510
        Value = Null
      end>
    Prepared = True
    SQL.Strings = (
      'select * from '#21028#26029#39064' where '#23398#21495'=:StuID')
    Left = 240
    Top = 112
    object ADOQuery4ID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOQuery4DSDesigner: TWideStringField
      FieldName = #23398#21495
    end
    object ADOQuery4DSDesigner2: TWideStringField
      FieldName = #39064#30446#20869#23481
      Size = 255
    end
    object ADOQuery4DSDesigner3: TWideStringField
      FieldName = #26631#20934#31572#26696
      Size = 4
    end
    object ADOQuery4DSDesigner4: TWideStringField
      FieldName = #26631#20934#29702#30001
      Size = 255
    end
    object ADOQuery4DSDesigner5: TWideStringField
      FieldName = #23398#29983#31572#26696
      Size = 4
    end
    object ADOQuery4DSDesigner6: TWideStringField
      FieldName = #23398#29983#29702#30001
      Size = 255
    end
  end
  object DataSource2: TDataSource
    DataSet = ADOQuery2
    Left = 144
    Top = 112
  end
  object DataSource3: TDataSource
    DataSet = ADOQuery3
    Left = 208
    Top = 112
  end
  object DataSource4: TDataSource
    DataSet = ADOQuery4
    Left = 272
    Top = 112
  end
  object ADOTable1: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #21306#38431#20449#24687
    Left = 304
    Top = 112
  end
  object DataSource5: TDataSource
    DataSet = ADOTable1
    Left = 336
    Top = 112
  end
  object ADOTable2: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #21333#36873#39064#24211
    Left = 368
    Top = 112
    object ADOTable2ID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOTable2Random: TIntegerField
      FieldName = 'Random'
    end
    object ADOTable2DSDesigner: TWideStringField
      FieldName = #39064#30446#20869#23481
      Size = 255
    end
    object ADOTable2A: TWideStringField
      FieldName = 'A'
      Size = 50
    end
    object ADOTable2B: TWideStringField
      FieldName = 'B'
      Size = 50
    end
    object ADOTable2C: TWideStringField
      FieldName = 'C'
      Size = 50
    end
    object ADOTable2D: TWideStringField
      FieldName = 'D'
      Size = 50
    end
    object ADOTable2E: TWideStringField
      FieldName = 'E'
      Size = 50
    end
    object ADOTable2F: TWideStringField
      FieldName = 'F'
      Size = 50
    end
    object ADOTable2G: TWideStringField
      FieldName = 'G'
      Size = 50
    end
    object ADOTable2H: TWideStringField
      FieldName = 'H'
      Size = 50
    end
    object ADOTable2DSDesigner2: TWideStringField
      FieldName = #26631#20934#31572#26696
      Size = 1
    end
    object ADOTable2DSDesigner3: TBlobField
      FieldName = #22270#29255
    end
  end
  object DataSource6: TDataSource
    DataSet = ADOTable2
    Left = 400
    Top = 112
  end
  object DataSource7: TDataSource
    DataSet = ADOTable3
    Left = 464
    Top = 112
  end
  object ADOTable3: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #22797#36873#39064#24211
    Left = 432
    Top = 112
    object ADOTable3ID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOTable3Random: TIntegerField
      FieldName = 'Random'
    end
    object ADOTable3DSDesigner: TWideStringField
      FieldName = #39064#30446#20869#23481
      Size = 255
    end
    object ADOTable3A: TWideStringField
      FieldName = 'A'
      Size = 50
    end
    object ADOTable3B: TWideStringField
      FieldName = 'B'
      Size = 50
    end
    object ADOTable3C: TWideStringField
      FieldName = 'C'
      Size = 50
    end
    object ADOTable3D: TWideStringField
      FieldName = 'D'
      Size = 50
    end
    object ADOTable3E: TWideStringField
      FieldName = 'E'
      Size = 50
    end
    object ADOTable3F: TWideStringField
      FieldName = 'F'
      Size = 50
    end
    object ADOTable3G: TWideStringField
      FieldName = 'G'
      Size = 50
    end
    object ADOTable3H: TWideStringField
      FieldName = 'H'
      Size = 50
    end
    object ADOTable3A2: TBooleanField
      FieldName = #26631#20934#31572#26696'A'
    end
    object ADOTable3B2: TBooleanField
      FieldName = #26631#20934#31572#26696'B'
    end
    object ADOTable3C2: TBooleanField
      FieldName = #26631#20934#31572#26696'C'
    end
    object ADOTable3D2: TBooleanField
      FieldName = #26631#20934#31572#26696'D'
    end
    object ADOTable3E2: TBooleanField
      FieldName = #26631#20934#31572#26696'E'
    end
    object ADOTable3F2: TBooleanField
      FieldName = #26631#20934#31572#26696'F'
    end
    object ADOTable3G2: TBooleanField
      FieldName = #26631#20934#31572#26696'G'
    end
    object ADOTable3H2: TBooleanField
      FieldName = #26631#20934#31572#26696'H'
    end
    object ADOTable3DSDesigner2: TBlobField
      FieldName = #22270#29255
    end
  end
  object ADOTable4: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #21028#26029#39064#24211
    Left = 496
    Top = 112
    object ADOTable4ID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOTable4Random: TIntegerField
      FieldName = 'Random'
    end
    object ADOTable4DSDesigner: TWideStringField
      FieldName = #39064#30446#20869#23481
      Size = 255
    end
    object ADOTable4DSDesigner2: TWideStringField
      FieldName = #26631#20934#31572#26696
      Size = 4
    end
    object ADOTable4DSDesigner3: TWideStringField
      FieldName = #26631#20934#29702#30001
      Size = 255
    end
    object ADOTable4DSDesigner4: TBlobField
      FieldName = #22270#29255
    end
  end
  object DataSource8: TDataSource
    DataSet = ADOTable4
    Left = 528
    Top = 112
  end
  object ADOTable5: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #32771#35797#35774#32622
    Left = 560
    Top = 112
    object ADOTable5DSDesigner: TIntegerField
      FieldName = #31572#39064#26102#38388
    end
    object ADOTable5DSDesigner2: TIntegerField
      FieldName = #21333#36873#39064#26465#25968
    end
    object ADOTable5DSDesigner3: TIntegerField
      FieldName = #21333#36873#39064#24635#20998
    end
    object ADOTable5DSDesigner4: TIntegerField
      FieldName = #21333#36873#39064#36873#39033#25968
    end
    object ADOTable5DSDesigner5: TWideStringField
      FieldName = #21333#36873#39064#35828#26126
      Size = 255
    end
    object ADOTable5DSDesigner6: TIntegerField
      FieldName = #22810#36873#39064#26465#25968
    end
    object ADOTable5DSDesigner7: TIntegerField
      FieldName = #22810#36873#39064#24635#20998
    end
    object ADOTable5DSDesigner8: TIntegerField
      FieldName = #22810#36873#39064#36873#39033#25968
    end
    object ADOTable5DSDesigner9: TWideStringField
      FieldName = #22810#36873#39064#35828#26126
      Size = 255
    end
    object ADOTable5DSDesigner10: TIntegerField
      FieldName = #21028#26029#39064#26465#25968
    end
    object ADOTable5DSDesigner11: TIntegerField
      FieldName = #21028#26029#39064#24635#20998
    end
    object ADOTable5DSDesigner12: TWideStringField
      FieldName = #21028#26029#39064#35828#26126
      Size = 255
    end
    object ADOTable5DSDesigner13: TWideStringField
      FieldName = #31649#29702#21592#23494#30721
    end
  end
  object DataSource9: TDataSource
    DataSet = ADOTable5
    Left = 592
    Top = 112
  end
end

⌨️ 快捷键说明

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