diff --git a/components/tvplanit/source/vpclock.pas b/components/tvplanit/source/vpclock.pas index 770d1d2e7..87eff1ad3 100644 --- a/components/tvplanit/source/vpclock.pas +++ b/components/tvplanit/source/vpclock.pas @@ -156,8 +156,10 @@ type protected {private} {$IFDEF DELPHI} FTimerPool: TVpTimerPool; + ckClockHandle: Integer; {$ELSE} FTimer: TTimer; + FTimeStarted: TDateTime; {time at which the timer is activated } {$ENDIF} FActive: Boolean; FHold: Boolean; @@ -187,11 +189,6 @@ type ckAnalogWidth: Integer; ckLEDDisplay: TVpLEDClockDisplay; ckDraw: TBitMap; - {$IFDEF DELPHI} - ckClockHandle: Integer; - {$ELSE} - FTimeStarted: TDateTime; {time at which the timer is activated } - {$ENDIF} ckOldHour: Integer; ckOldMinute: Integer; ckOldSecond: Integer;