Поиск:

Ответ в темуСоздание новой темы Создание опроса
> [Tcl/Tk] Возможно ли обработка событий от часов? К примеру, окошко, в котором идут часы 
:(
    Опции темы
ur4qtp
Дата 17.8.2010, 14:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 17.8.2010

Репутация: нет
Всего: нет
Добрый день!

Пишу небольшую программу на Tcl/Tk. Она содержит поля для ввода данных, которые затем будут записаны в файл. Также в этот файл должны быть записаны дата и время ввода данных. А эта дата и время обязательно должны быть также в окошке программы и меняться в режиме реального времени. Перерыл интернет и книгу Уэлша, но так и не понял, можно ли этого добиться. Если максимально упростить задачу, то нужно создать окошко, в котором идут часы. Пример окошка вкладываю. В этом окошке выведено время, но как заставить его обновляться?

bind .windowN ??? RefreshOfClock

Какое событие должно быть вместо ??? Или я вообще не в том направлении мыслю? Или это невозможно средствами Tcl/Tk?

user posted image

Это сообщение отредактировал(а) ur4qtp - 3.9.2014, 21:10
PM MAIL   Вверх
kingu
Дата 22.10.2010, 21:57 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 6
Регистрация: 8.7.2007

Репутация: нет
Всего: нет
Часы
Код

#!/usr/bin/wish -f

set timediff 10000
set format "%a %d/%b/%Y %H:%M"
set clock 0
wm resizable . 0 0
wm title . tkclock
wm geometry . -0+0

proc set_clock {} {
    global clock timediff format
    set clock [clock format [clock seconds] -format $format ]
    update
    after $timediff [list set_clock]
    pack .l
}

label .l -justify left -textvariable clock \
        -foreground Grey \
        -background Black 

set_clock
after $timediff [list set_clock]
pack .l
PM MAIL   Вверх
ur4qtp
Дата 27.10.2010, 12:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 17.8.2010

Репутация: нет
Всего: нет
Спасибо за помощь!
Немного смущает использование after. В просто часах больше никакая работа не выполняется, мне же нужно параллельно с ходом часов осуществлять ввод-вывод. Буду разбираться дальше. 
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Добро пожаловать в раздел "Другие языки" форума Vingrad!

Void
Void

Раздел посвящён различным языкам программирования, для которых (в силу невысокой популярности) нет отдельного раздела (GPSS, Lua, MATLAB, Ada, Forth, Smalltalk, Tcl, REXX, AWK и др.)

  • Обязательно следуйте правилам Форума.
  • Пожалуйста, прочитайте и следуйте рекомендациям по работе в разделе и навигации по Форуму.
  • Для вставки текстов исходных кодов используйте подсветку синтаксиса из выплывающего списка Код в форме ответа. Если Ваш язык в списке не представлен, то используйте тег: [code=ваш_язык]код[/code], например, [code=ada]код[/code]. Если в будущем подсветка синтаксиса для указанного языка будет реализована, исходный код преобразится.
  • Помните, один вопрос - одна тема.

Приятного времяпрепровождения! С уважением, Void, kemiisto .
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Другие языки | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.1138 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.