Delphi-Projects

1
object PingDownService: TPingDownService
2
  OldCreateOrder = False
3
  OnCreate = ServiceCreate
4
  OnDestroy = ServiceDestroy
5
  DisplayName = 'PingDownService'
6
  BeforeInstall = ServiceBeforeInstall
7
  AfterInstall = ServiceAfterInstall
8
  AfterUninstall = ServiceAfterUninstall
9
  OnContinue = ServiceContinue
10
  OnExecute = ServiceExecute
11
  OnPause = ServicePause
12
  OnShutdown = ServiceShutdown
13
  OnStart = ServiceStart
14
  OnStop = ServiceStop
15
  Height = 150
16
  Width = 215
17
  object Timer1: TTimer
18
    Enabled = False
19
    Interval = 60000
20
    OnTimer = Timer1Timer
21
    Left = 72
22
    Top = 40
23
  end
24
end
25