unit2.dfm

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

object OffLinePServ: TOffLinePServ
  OldCreateOrder = False
  Left = 284
  Top = 179
  Height = 160
  Width = 277
  object Query1: TQuery
    Active = True
    DatabaseName = 'DBDEMOS'
    SQL.Strings = (
      'Select * from country ')
    Left = 48
    Top = 32
  end
  object DataSetProvider1: TDataSetProvider
    DataSet = Query1
    Left = 112
    Top = 40
  end
end