![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Скорость работы алгоритма
NieL © (2008-06-15 17:08:00)Уважаемые Мастера подскажите программные средства с помощью которых можно определить скорость работы алгоритма.
antonn (2008-06-16 09:05:00) [1]
var
Divisor : Int64;
T1 : Int64;
TotalTime : Extended;
begin
if QueryPerformanceFrequency( Divisor ) then
begin
QueryPerformanceCounter( T1 );
TotalTime := T1;
//сто тыщь миельнов запуска алгоритма
QueryPerformanceCounter( T1 );
TotalTime := (T1 - TotalTime) / Divisor ;
label1.caption:=floattostr(TotalTime);
end;
end;
Джо (2008-06-16 05:17:00) [2]К MBo добавлю еще профайлер ProDelphi, встраивается в среду (эксперт), хоть, возможно, для сложных задач «простоват».
MBo (2008-06-15 19:07:00) [3]Скорость работы алгоритма определяется ментально, а скорость работы его реализации в простом случае - как в [1] написано, а при необходимости более детального анализа - нужен профайлер (Intel VTune, AQTime, еще несколько)
Renegat (2008-06-15 17:24:00) [4]GetTickCount -> Выполнить_алгос_стотыщмильёнов_раз -> (GetTickCount - Предыдущий_GetTickCount)/стотыщмильёнов