루프 시간측정 성능테스트

루프 시간측정 성능테스트

 

user System.Diagnostics

 

procedure TForm1.Button1Click(Sender: TObject);

var

_Stopwatch: TStopwatch;

begin

 

_Stopwatch := TStopwatch.StartNew;

 

for i := 0 to 19999 do

begin

   //////////////

end;

 

Memo1.Lines.Add(IntToStr(_Stopwatch.ElapsedMilliseconds)); // 1,012