Tcl / TK秒表时间跟踪器

时间:2011-10-17 20:46:47

标签: tcl tk

我正在为我的工作开展任务跟踪计划。它是从stopwatch修改的。

它的基本功能是直观地跟踪每个任务所花费的时间,将其记录到文本文件中并将时钟归零。 Here是该程序的屏幕截图。

按钮和标签使用网格放置,如下所示:

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
}


因此,即使现在有12个条目,gui也变得笨拙,我还有大约15个要添加。我设想的是,现在使用网格排列的所有条目将被安排到单个下拉菜单中。

如何实现这一点的任何建议将非常感激。

1 个答案:

答案 0 :(得分:1)

尝试使用tktable。它似乎是为这种表格数据而设计的,而IIRC它可以绑定到一个数组,因此插入更多行应该很简单。