mdunit1.~dfm

这是一个Delphi很好很全面知识的实例

object MD: TMD
  OldCreateOrder = False
  Left = 215
  Top = 211
  Height = 322
  Width = 475
  object DataSRSource1: TDataSource
    DataSet = ADOSRTable1
    Left = 384
    Top = 40
  end
  object DataZCSource2: TDataSource
    DataSet = ADOZCTable2
    Left = 384
    Top = 96
  end
  object DataMMSource3: TDataSource
    DataSet = ADOMMTable3
    Left = 384
    Top = 160
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=grlz.mdb;Persist Se' +
      'curity Info=False;Jet OLEDB:Database Password=25810877589'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 96
    Top = 112
  end
  object ADOSRTable1: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #20010#20154#25910#20837#31649#29702#34920
    Left = 296
    Top = 40
  end
  object ADOZCTable2: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = #20010#20154#25903#20986#31649#29702#34920
    Left = 296
    Top = 104
  end
  object ADOMMTable3: TADOTable
    Connection = ADOConnection1
    TableName = #23494#30721#34920
    Left = 296
    Top = 160
  end
  object ADOSRQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 192
    Top = 43
  end
  object ADOZCQuery2: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 192
    Top = 104
  end
  object ADOMMQuery3: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 192
    Top = 160
  end
end