object fDataMod: TfDataMod
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 363
  Top = 202
  Height = 304
  Width = 360
  object adoQueDateTime: TADOQuery
    CacheSize = 1000
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'Select GetDate()  As CurrentDateTime')
    Left = 104
    Top = 32
  end
  object adocon: TADOConnection
    ConnectionString = 'Provider=MSDASQL.1;Persist Security Info=False;Data Source=123'
    LoginPrompt = False
    Provider = 'MSDASQL.1'
    Left = 160
    Top = 120
  end
end