Посчёт времени на паскале... Опции

[DJ Nick Spirit]

Моё почтение всем! У меня такая проблема - как в паскале можно организовать подсчёт прошедшего времени с момента запуска программы??? заранее очень благодарен!!! надеюсь сильно не отвлёк никого. Спасибо!

[volvo]

У меня на сайте смотрел? Там приведено несколько способов:

http://volvo71.narod.ru/time_count.htm

Выбирай ...

[DJ Nick Spirit]

Спасибки сейчас взгляну!!!

Добавлено через 4 мин.
эм.... это всё конечно хорошо...
Но я походу вопрос не так сформулировал: я делаю цикл repeat until а условие выхода из него такое что если время с начала диалога с пользователем больше определённого то выходим... вот. Ну вот я знаю что в бэйсике например есть оператор TIMER.. а вот в паскале??? спасибо ещё раз!

[volvo]

Ну, и чем не устроила функция GetTime? Использовать вот так, например:

repeat

  start_time := gettime;
  ...
  if gettime - start_time > max_time then break;

until false;

При желании можно сделать то же самое с таймером (MemL[0:$046C])...

[DJ Nick Spirit]

о пасибо блин огромное!!!!!!!!!!!!!!!!!!!!!!!
Ну вот недодумался я так...