728x90
반응형
TStopwatch를 이용한 실행 시간 측정

성능 분석이나 특정 코드 블록의 처리 시간을 측정할 때는
System.Diagnostics 유닛의 TStopwatch를 사용하는 것이
가장 간편하고 정확합니다.
특히 반복 루프나 쿼리 실행 시간 측정에 유용합니다.
uses
System.Diagnostics, System.SysUtils;
procedure MeasureExecutionTime;
var
Stopwatch: TStopwatch;
I: Integer;
begin
Stopwatch := TStopwatch.StartNew;
// 시간 측정 대상 코드
for I := 1 to 1000000 do
Inc(I);
Stopwatch.Stop;
ShowMessage(Format('소요 시간: %dms', [Stopwatch.ElapsedMilliseconds]));
end;
●TStopwatch.StartNew로 타이머 시작
●Stopwatch.Stop 후 ElapsedMilliseconds 또는 Elapsed.TotalSeconds로 시간 확인
●가벼운 코드 프로파일링이나 최적화에 유용

728x90
반응형
'Delphi Tip > +Tip' 카테고리의 다른 글
ForceDirectories로 중첩된 폴더 자동 생성하기 (0) | 2025.04.11 |
---|---|
Application.ProcessMessages의 역할과 주의점 (0) | 2025.04.08 |
프로그램 디버그(Debug) 메시지를 찍기 (0) | 2024.07.06 |
dfm 직접 폼디자인 변경 (0) | 2024.07.01 |
폼 미러링 (Form Mirroring) (0) | 2024.06.17 |
댓글