unit3.~dfm

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

object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 188
  Top = 133
  Height = 215
  Width = 210
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\'#29579#27743#26494'\db1.mdb;Pers' +
      'ist Security Info=False'
    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