Tcl / TK Секундомер - PullRequest
Новая
       8

Tcl / TK Секундомер

0 голосов
/ 18 октября 2011

Я работаю над программой отслеживания задач для моей работы. Модифицировано с секундомер .

Его основная функция - визуально отслеживать время, которое занимает каждая задача, записывать ее в текстовый файл и обнулять часы. Здесь - это скриншот программы в том виде, в котором она находится сейчас.

Кнопки и метки размещаются с использованием сетки следующим образом: 

grid .laplabel .laptime .laprecord .lapzero
grid configure .laplabel      -sticky e
grid configure .laptime       -sticky ns
grid .lap2label .lap2time .lap2record .lap2zero
grid configure .lap2label      -sticky e
grid configure .lap2time       -sticky ns
grid .lap3label .lap3time .lap3record .lap3zero

и т.д ...

Каждое нажатие кнопки записи вызывает .laprecord и .lapzero следующим образом: 

button .laprecord -text "record" -command {
    record L TEST$time(lap)
set time(lap) [timeformat 0]
set time(lstart) [now]
}
proc lapzr {} {
    .laprecord invoke
    .lapzero invoke
}


Таким образом, графический интерфейс становится громоздким даже при наличии двенадцати записей, и у меня есть еще пятнадцать, чтобы добавить. Я предполагаю, что все записи, которые теперь упорядочены с использованием сетки, вместо этого будут упорядочены в одно выпадающее меню.

Любой совет о том, как этого добиться, был бы очень признателен.

1 Ответ

1 голос
/ 18 октября 2011

Попробуйте использовать tktable .Похоже, что он предназначен для табличных данных такого рода, и IIRC может быть привязан к массиву, поэтому вставка большего количества строк должна быть простой.

...