Changeset 456 for trunk/Packages/Common/StopWatch.pas
- Timestamp:
- May 30, 2023, 11:31:10 AM (18 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Packages/Common/StopWatch.pas
r447 r456 35 35 implementation 36 36 37 constructor TStopWatch.Create(const startOnCreate : Boolean = False) ;37 constructor TStopWatch.Create(const startOnCreate : boolean = false) ; 38 38 begin 39 39 inherited Create; … … 72 72 begin 73 73 dt := ElapsedMiliseconds / MSecsPerSec / SecsPerDay; 74 Result := Format('%d days, %s', [Trunc(dt), FormatDateTime('hh:nn:ss.z', Frac(dt))]) ;74 result := Format('%d days, %s', [Trunc(dt), FormatDateTime('hh:nn:ss.z', Frac(dt))]) ; 75 75 end; 76 76 … … 93 93 94 94 end. 95
Note:
See TracChangeset
for help on using the changeset viewer.