Source position: daemonapp.pp line 27
type TDaemonEvent = procedure(
Sender: TCustomDaemon
) of object;