object fDataMod: TfDataMod
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 385
  Top = 261
  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
    Connected = True
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=apcb;Persist Security Info=True;Use' +
      'r ID=sa;Initial Catalog=whpersonnel;Data Source=test-amd'
    LoginPrompt = False
    Provider = 'SQLOLEDB.1'
    Left = 160
    Top = 120
  end
end