有没有办法在Perl 5.004 / Tk 400中使用gridRowconfigure

Question

在你问之前，“为什么你使用那个旧版本的Perl？”，它不在我手中。我必须使用我可用的工具来完成这个项目。我的问题是有没有人知道是否有可能，如果是这样，语法看起来像使用gridRowconfigure，如下所示：

$main_window->gridRowconfigure(1, -weight => 1, -minsize => 171, -pad => 0);

in，Perl 5.004，Tk 400.谢谢。

Answer 1

由于您使用的是Tk-400.202，“perldoc Tk::grid”似乎应该告诉您需要了解的内容。您可能需要阅读其他一些文档，但是：

$master->gridRowconfigure(index?, -option=>value, ...?)

     

查询或设置几何的索引行的行属性              主人，$ master。有效选项是-minsize，-weight和-pad。              如果提供了一个或多个选项，则索引可以作为a给出              配置选项将运行的行indeces [sic] 的列表              上。 -minsize选项以屏幕为单位设置最小大小，              这一行将被允许。 -weight选项（一个              整数值）设置分配任何额外的相对权重              行之间的空格。权重为零（0）表示该行不会              偏离其要求的大小。重量为2的行将              当有额外的空间时，增长速度是一排重量的两倍              分配给布局。 -uniform选项，当非空时              提供了值，将行放在一个统一的组中              -uniform具有相同值的行。行的空间              属于统一组的是分配它们的大小              总是与他们的重量值严格按比例。请参阅THE GRID              以下是ALGORITHM的详细信息。 -pad选项指定              将添加到最大窗口的屏幕单位数              当网格几何管理器完全包含在该行中              从包含窗口请求大小。如果只有一个选项              指定的，没有值，该选项的当前值是              回。如果只指定了主窗口和索引，则全部              当前设置在“option-value”列表中返回              对

正如我在对该问题的评论中所指出的 - 这是应该升级的古董软件。

Answer 2

如果那意味着Tk 4.0，我想你不能。网格在Tk 4.1中添加。

如果存在Grid，则rowconfigure应该是从一开始就存在的。当你尝试上面写的内容时，你会遇到什么问题/错误？