GetTickCount в Turbo Pascal 7.0

← →
Denis__ © (2008-11-07 12:17) [0]

Собственно, сабж. Нужно для проверки времени выполнения операций.
k := GetTickCount; //......... k := GetTickCount - k;
Как сделать что-то подобное в TP7?
Или я не правильно делаю?

← →
Vlad Oshin © (2008-11-07 12:26) [1]

gettime

← →
Vlad Oshin © (2008-11-07 12:28) [2]

а там еще есть прерывания, если чистый dos
0х1С - юзерское (18.3 раза в секунду)
и кажется 0х08 системное

← →
Denis__ © (2008-11-07 12:31) [3]

А что возвращает GetTime? Просто нет сейчас под рукой ничего. Ни Паскаля, ни учебников.

← →
Palladin © (2008-11-07 12:35) [4]

ничего не возвращает, это процедура
procedure GetTime(var Hour, Minute, Second, Sec100: Word);
unit Dos

Спасибо. Туплю я:) отвык от интернета. Да и не думал что есть что-то по паскалю :) Порылся, нашел все что нужно. Спасибо за ответы.

http://ru.wikipedia.org/wiki/Rdtsc

GetTickCount в Turbo Pascal 7.0 Найти похожие ветки