<pre name="code" class="python"># DESCRIPTION # Tk::Table is an all-perl widget/geometry manager # which allows a two dimensional table of arbitary perl/Tk widgets to be displayed. # Tk::Table 是一个部件/部件管理器 # 允许任意2维表来显示 # Entries in the Table are simply ordinary perl/Tk widgets. # They should be created with the Table as their parent. Widgets are positioned in the table using: # 在表里的条目是简单普通部件 # 它们需要在父窗体下创建,部件被放在表里使用 # $table->put($row,$col,$widget) # 如果 $widget 不是一个引用那么就对待为字符串, # 一个Label 部件使用字符串来创建 # 所有的部件在每个列是设置为相同的宽度 ,最宽的部件列的宽度 # 同样的,所有的部件在每个列是设置为相同的高度 ,最高部件列的高度 # 多行或者多列 可以标记为fixed, 可以作为'headings' 剩下的记录可以用滚动条滚动 # 请求的表的尺寸 行的记录有-rows指定(默认10), # 列有-columns 指定(默认10) # 表可以创建和管理它自己的滚动条 如果指定-scrollbars # 清空表使用: # $table->clear # 部件在表里会被摧毁. # Tk::Table 部件是来自于Tk::Frame,因此它继承了它所有的配置选项。