diff --git a/components/longtimer/demo/longtimerdemo.lpi b/components/longtimer/demo/longtimerdemo.lpi index beb279bf7..a62e0b35a 100644 --- a/components/longtimer/demo/longtimerdemo.lpi +++ b/components/longtimer/demo/longtimerdemo.lpi @@ -19,6 +19,9 @@ + + + @@ -122,6 +125,7 @@ + diff --git a/components/longtimer/demo/longtimerdemo.res b/components/longtimer/demo/longtimerdemo.res index 426ac653a..79dc42f99 100644 Binary files a/components/longtimer/demo/longtimerdemo.res and b/components/longtimer/demo/longtimerdemo.res differ diff --git a/components/longtimer/demo/umainform.lfm b/components/longtimer/demo/umainform.lfm index 598c726ce..966fc678e 100644 --- a/components/longtimer/demo/umainform.lfm +++ b/components/longtimer/demo/umainform.lfm @@ -11,7 +11,7 @@ object mainform: Tmainform DefaultMonitor = dmPrimary OnCreate = FormCreate Position = poScreenCenter - LCLVersion = '1.7' + LCLVersion = '1.3' object cmd_Close: TBitBtn Left = 104 Height = 30 diff --git a/components/longtimer/demo/umainform.pas b/components/longtimer/demo/umainform.pas index 215020a1c..c44179cf6 100644 --- a/components/longtimer/demo/umainform.pas +++ b/components/longtimer/demo/umainform.pas @@ -59,7 +59,7 @@ procedure Tmainform.LongTimer1Timer(Sender: TObject); begin // memo_ReportTimerEvent.Lines.Add('LastFired at ' + FormatDateTime('hh:nn:ss', LongTimer1.LastFired)); memo_ReportTimerEvent.Lines.Add('Timer fired at ' + FormatDateTime('hh:nn:ss dd-mm-yyyy', Now)); - //memo_ReportTimerEvent.Lines.Add(LongTimer1.fDebugString); + memo_ReportTimerEvent.Lines.Add(LongTimer1.fDebugString); end; @@ -89,7 +89,7 @@ end; procedure Tmainform.LongTimer1Sample(Sender: TObject); begin memo_ReportTimerEvent.Lines.Add('Sampled at ' + FormatDateTime('hh:nn:ss', Now)); - //memo_ReportTimerEvent.Lines.Add(LongTimer1.fDebugString); + memo_ReportTimerEvent.Lines.Add(LongTimer1.fDebugString); end; procedure Tmainform.LongTimer1StartTimer(Sender: TObject);