utdmdelphi6adoserver.dfm

来自「Delphi开发webservice的一套例子」· DFM 代码 · 共 44 行

object Delphi6ADOServer: TDelphi6ADOServer
  OldCreateOrder = False
  OnActivate = MtsDataModuleActivate
  OnDeactivate = MtsDataModuleDeactivate
  Pooled = False
  Left = 384
  Top = 166
  Height = 254
  Width = 335
  object adocDBDemos: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Program Files\Co' +
      'mmon Files\Borland Shared\Data\dbdemos.mdb;Persist Security Info' +
      '=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 72
    Top = 24
  end
  object adodsEmployee: TADODataSet
    Connection = adocDBDemos
    CursorType = ctStatic
    CommandText = 'select * from employee'
    Parameters = <>
    Left = 216
    Top = 24
  end
  object dspEmployee: TDataSetProvider
    DataSet = adodsEmployee
    Constraints = True
    Options = [poAllowCommandText]
    Left = 72
    Top = 136
  end
  object cdsEmployee: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspEmployee'
    Left = 224
    Top = 136
  end
end