unit2.dfm

《Delphi7编程100例》代码,书配资料

object MyFirstMTSDM: TMyFirstMTSDM
  OldCreateOrder = False
  Pooled = False
  Left = 344
  Top = 162
  Height = 163
  Width = 301
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
      'fo=False;Initial Catalog=Northwind;Data Source=JASONET'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 48
    Top = 16
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 48
    Top = 72
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = ADOTable1
    Constraints = True
    Left = 216
    Top = 16
  end
  object ADOTable1: TADOTable
    Connection = ADOConnection1
    TableName = 'Products'
    Left = 136
    Top = 16
  end
end