Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: Системное программирование > Работа с таймером


Автор: Gain 8.4.2011, 09:57
Народ, помогите с написанием таймера! Есть простое GUI приложение, в котором при нажатии определенной кнопки должен запускаться таймер на 60 секунд. При этом каждую секунду нужно отрисовывать текущее состояние таймера (60, 59, 58, ...).
Вроде бы самое оно функция settimer и последующая обработка сигнала (экзампл с man-странички Time::HiRes):
use Time::HiRes qw ( setitimer ITIMER_VIRTUAL time );
$SIG{VTALRM} = sub { print time, "\n" };
setitimer(ITIMER_VIRTUAL, 10, 2.5);
но получается ошибка:
Your vendor has not defined Time::HiRes macro ITIMER_VIRTUAL, used at line 3.

Windows 7, ActivePerl 5.12

Автор: Pfailed 8.4.2011, 12:39
Обычно в GUI библиотеках есть свои таймеры. Какую библиотеку используете?

Автор: Gain 8.4.2011, 13:46
wxWidgets (wxPerl)

Автор: Pfailed 8.4.2011, 16:15
http://docs.wxwidgets.org/2.8/wx_wxtimer.html#wxtimer

Автор: Gain 11.4.2011, 15:57
спасибо, как-то сразу и не увидел этот виджет

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)