본문 바로가기

Delphi/간단하게

간단하게 StopWatch로 시간 체크하기

uses
  .., System.Diagnostics;
var 
  StopWatch: TStopWatch;
begin
  //생성과 동시에 시작
  StopWatch := TStopWatch.StartNew;
  //생성 후 수동 시작
  StopWatch := TStopWatch.Create;
  StopWatch.Start; 
  
  ..
  //멈춤
  StopWatch.Stop;
  
  ShowMessage(
    FormatDateTime(
      'hh:nn:ss:zzz',
      StopWatch.ElapsedMilliseconds/MSecsPerDay
    )
  );
end;
반응형