[原创]一个简单的Layout创建工具(alpha测试)

e2002

一直为AutoCAD 200x的Layout操作的繁琐过程闹心,
有一批关于Layout的需要写出来,可惜一直忙的时候没时间,闲的时候又为生活中的太多事情而没有心情....唉... 今天努力使自己坐下来一下午来完善这个程序.
请大家帮忙测试一下,有什么建议,或发现bugs,在后面跟贴吧...8-) 2004/06/10 fixed : margine固定为2mm的bug

e2002

界面截图:

citykunan

很不错，我曾经向龙版主请教过viewport的问题，学到了很多，今天又有了一个好工具，这个工具使得出viewport更加简单了。

龙龙仔

citykunan要用就把它写出来吧!

仿冒程序是学习的一种过程,谁能把e2002版主的程序(lkpt_layout_from_model_alpha.VLX)仿出9成像

(不要源码,贴上vlx程序即给与1分)

citykunan

这个程序的magine是有什么用的？

citykunan

我仿冒e2002版主的程序作了一个，基本和他的功能相仿，但是可能bug会多一点欧：）。还望指点。


       





       

spring

我想问一下你们布局都在什么下情况用？因为我从来没有用过这个功能. ^_^

citykunan

在出图打印时用，能缩放比例很有用的。

龙龙仔

1. customize时无初始值

2. 无margine项

3. 无出错警讯

Sorry!未达标准!再改进一下!

仿冒!!!!那就直接从原程式(vlx)中,把dcl档抓出来,e2002的程式内含4个dcl

lkpt_layouts

lkpt_layout_ltscale

lkpt_layout_create_2pt

lkpt_layout_serialcreate

(可使用…..…..把它抓出) lkpt_layout_create_2pt: dialog{
label ="Create Layout from Model";
: boxed_column{
label ="Scale";
mnemonic ="S";
: popup_list{
key ="pl_scales";
}
: row{
: edit_box{
key ="ed_punits";
}
: text{
label ="mm = ";
}
: edit_box{
key ="ed_units";
}
: text{
label ="Units";
}
}
}
: boxed_row{
label ="Margine";
mnemonic ="M";
: slider{
key ="sl_margine";
min_value = 0;
max_value = 20;
small_increment ="1";
big_increment ="5";
}
: text{
key ="tx_margine";
}
: text{
label ="mm (Paper Units)";
}
}
: boxed_row{
label ="Create to";
mnemonic ="C";
: radio_column{
key ="rc_mode";
: radio_button{
label ="New layout";
key ="rd_new";
mnemonic ="N";
}
: radio_button{
label ="Exist layout";
key ="rd_old";
mnemonic ="E";
}
}
: column{
: edit_box{
key ="ed_newname";
width = 25;
}
: popup_list{
key ="pl_layouts";
}
}
}
: row{
fixed_width = true;
alignment = right;
: button{
label ="Create";
key ="bt_create";
mnemonic ="C";
}
: button{
label ="Exit";
key ="bt_exit";
mnemonic ="E";
is_cancel = true;
}
}
errtile;
}

citykunan

我改进了一下 1. customize时有初始值了 2. 加了margine项 3. 也加了出错警讯 重新附了上来，请指教。谢谢。