| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
GetTickCount в Turbo Pascal 7.0
Denis__ © (2008-11-07 12:17:00)Собственно, сабж. Нужно для проверки времени выполнения операций.
k := GetTickCount;
//.........
k := GetTickCount - k;
Как сделать что-то подобное в TP7?
Или я не правильно делаю?
han_malign (2008-11-07 13:26:00) [1]http://ru.wikipedia.org/wiki/Rdtsc
Denis__ (2008-11-07 12:41:00) [2]Спасибо. Туплю я:) отвык от интернета. Да и не думал что есть что-то по паскалю :) Порылся, нашел все что нужно. Спасибо за ответы.
Palladin (2008-11-07 12:35:00) [3]ничего не возвращает, это процедура
procedure GetTime(var Hour, Minute, Second, Sec100: Word);
unit Dos
Denis__ (2008-11-07 12:31:00) [4]А что возвращает GetTime? Просто нет сейчас под рукой ничего. Ни Паскаля, ни учебников.
Vlad Oshin (2008-11-07 12:28:00) [5]а там еще есть прерывания, если чистый dos
0х1С - юзерское (18.3 раза в секунду)
и кажется 0х08 системное
Vlad Oshin (2008-11-07 12:26:00) [6]gettime
| |
