TK 高手看下~~

本帖最后由 nicaijin 于 2011-06-01 19:05 编辑

你好！  多谢贵人的你的帮忙啊

   要求效果是：  1 将文件格式中的“Gerber Dxf Drill”3个收音机按钮放在 “导出格式” 后面

               2 将带有列表的滚动条框放在 Select Layer  后面

               3 那个滚动条要和列表一样高度高度  要协调。

   真诚求助~~~

新建文件夹.rar (1.23 KB)

作者: nicaijin 发布时间: 2011-06-01

可以参考下面这种写法

my $labeled_frame1 = $mw->LabFrame(-label => "输出资料信息：",
-labelside => "acrosstop")->pack(-side => "top",-fill => "x");
my$ia_job_framel = $labeled_frame1->Frame()->pack(-fill => "x");
$ia_job_framel->Label(-text => "操作者:")->pack(-side => "left");
$ia_job_framel->Entry(-textvariable => "Genesis")->pack(-side => "left");
$ia_job_framel->Label(-text => "料号:")->pack(-side => "left");
$ia_job_framel->Entry()->pack(-side => "left");
$ia_job_framel->Label(-text => "Step:")->pack(-side => "left");
$ia_job_framel->Entry()->pack(-side => "left");

复制代码

作者: 首天发布时间: 2011-06-02

QUOTE:

你好！多谢贵人的你的帮忙啊

要求效果是： 1 将文件格式中的“Gerber Dxf Drill”3个收 ...
nicaijin 发表于 2011-06-01 19:04

使用labframe实现，幸会~我也是做这个的，其实多看一点Mastering PerlTk足够我们这行用了，附件是我修改了一下结果

kk.zip (1.23 KB)

作者: kk861123 发布时间: 2011-06-02

另外提点建议：
1，对于输出资料最好不要用选择层名的方式，改为内层、外层、防焊等，然后通过程序自己选择层名
2，dxf,gerber，drill等可以不用设置，改由程序自动设置
3，step一栏可以设置判断，如在Step中执行程序，则不显示此栏，直接获取Step，
4，step名称不要固定，改由DO_INFO获取Step_list动态更新

总之，如果程序能够实现的，就用程序实现，能动态更新的就不设定固定值

作者: 首天发布时间: 2011-06-02

TK 高手看下~~

热门频道