sexta-feira, 9 de abril de 2010

Mostrando os milisegundos entre códigos Delphi, útil para testar a performace de SQL

var
startTick, endTick: Int64;

begin
startTick := GetTickCount;
//insira seu código aqui
endTick := GetTickCount;
ShowMessage(IntToStr(endTick - startTick));
end;

Acesse mais informações sobre Delphi aqui

Nenhum comentário:

Postar um comentário