uses System.Diagnostics
var
stopwatch: TStopWatch;
begin
stopwatch := TStopWatch.StartNew;
try
process ~~
// Get process time : stopwatch.ElapsedMilliseconds
finally
stopwatch.Stop;
end;
end;http://docwiki.embarcadero.com/Libraries/Sydney/en/System.Diagnostics.TStopwatch
System.Diagnostics.TStopwatch - RAD Studio API Documentation
From RAD Studio API Documentation Delphi TStopwatch = record strict private class var FFrequency: Int64; class var FIsHighResolution: Boolean; class var TickFrequency: Double; strict private FElapsed: Int64; FRunning: Boolean; FStartTimeStamp: Int64; funct
docwiki.embarcadero.com
반응형
'Delphi' 카테고리의 다른 글
| [Delphi] TIniFile 클래스 (0) | 2022.09.14 |
|---|---|
| [Delphi] 모달, 모달리스 폼 띄우기 (0) | 2022.09.05 |
| [Delphi] TNetHttpClient multipart/form-data : Send File (0) | 2022.06.20 |
| [Delphi] ZLib (Compress, Decompress) (0) | 2022.06.13 |
| [Delphi] Socket 에러에 따른 내용 (0) | 2022.05.17 |