Помощь - Поиск - Пользователи - Календарь
Полная версия: часы
Форум «Всё о Паскале» > Pascal, Object Pascal > Теоретические вопросы
Гия
Как на паскале сделать следующую вешь:
нужно чтобы отпечаталось текущее время например
               12:34:12
т. е. 12 часов 34 минуты и 12 секунд и затем точно
через каждую секунду.
что то не получилось сформулировать вопрос)

короче, надо чтобы шли часы в моей программе

заранее благодарю.              
GLuk
Независимо от текущего процесса?
Гия
необязательно, после некоторого действия должна вызываться функция и в ней печататься время на протяжении 2 мин, но если можно это делать и независимо от текущего процесса, то если можешь приведи оба примера.
Ivs
ну вообщето для этого служит ф-я GetTime(hour,min,sec,milisec);
вот небольшой пример:
Код

program Timer;
uses dos,crt;
var
  h,m,s,ms:Word;
begin
  ClrScr;
  repeat
     GetTime(h,m,s,ms);
     Gotoxy(1,1);
     Write(h:2,':',m:2,':',s:2);
  until keypressed;
end.

Гия
я то знаю что для этого служит gettime
мне надо другое:
как посчитать сколько точно времени прошло после некоторого действия иначе как узнать что прошло точно 2 минуты?
Ivs
Ну дык надо получить текущее время, запомнить его в переменных, а потом в цикле получать новые и сравнивать на необходимую разность.
Гия
так тип там string возвращается же(
ozzy
Цитата
так тип там string возвращается же(

val
Ivs
Цитата
так тип там string возвращается же(

ЭЭЭ.....Вобщето там возвращается тип WORD.........
Гия
И правда там возвращаемый тип WORD. Спасибо ребята за участие в моей программе.Всё получилось что я хотел.Да, трудно без хелпа работать(
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.