unit3.dfm

来自「delphi开发的小软件」· DFM 代码 · 共 38 行

object DataModule1: TDataModule1
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 188
  Top = 133
  Height = 215
  Width = 210
  object ADOConnection1: TADOConnection
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 32
    Top = 16
  end
  object ADOTable1: TADOTable
    Connection = ADOConnection1
    TableName = #34920'1'
    Left = 112
    Top = 16
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select Number, Name, Sex, Age, Address, Comment'
      'from '#34920'1'
      'order by Number ASC')
    Left = 32
    Top = 80
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 112
    Top = 80
  end
end