[原创]让图像控件菜单更方便
本帖最后由 作者 于 2008-3-12 20:26:49 编辑 <br /><br /> <p>AutoCAD的mnu文件中有IMAGE图像控件菜单,但使用不太方便,</p><p>我模拟它写了一个程序:</p><p> DCL:</p><p></p><p> LSP:</p><p></p><p>VLX:</p><p></p><p>使用方法:</p><p>函数:</p><p>(LoadDialog_SlideMgr16 "标题" data)</p><p>参数data格式:</p><p>data - '((sldname labeltext command)...)</p><p>例子:</p><p>(defun c:SlideMgr16_Test ( / name data)<br/> (defun cmd1 () (alert "cmd1"))<br/> (defun cmd2 () (alert "cmd2"))<br/> (defun cmd3 () (alert "cmd3"))<br/> ;<br/> (setq name "Hello")<br/> (setq data '(("scsl(SCSL101)" "村界跳绘" "(cmd1)")<br/> ("scsl(SCSL105)" "计曲线" "(cmd2)")<br/> ("scsl(SCSL106)" "村界跳绘" "(cmd3)")<br/> ("scsl(SCSL110)" "山洞,溶洞" "(cmd3)")<br/> ("scsl(SCSL111)" "三角点" "(cmd3)")<br/> )<br/> )<br/> ;<br/> (LoadDialog_SlideMgr16 "SlideMgr16" data)<br/> (princ)<br/>)</p> 本帖最后由 作者 于 2008-2-17 20:18:03 编辑 <br /><br /> <p>SlideMgr.VLX中包含了:</p><p>LoadDialog_SlideMgr9</p><p>LoadDialog_SlideMgr16</p><p>LoadDialog_SlideMgr25</p><p>三个函数.</p><p>例图:</p> dcl文件由DCG工具设计完成 本帖最后由 作者 于 2008-2-18 10:27:13 编辑不会用,我太菜了,指点下吧,为可没图像.... 能否把左边的做成类别,如:
1. 电机
2. 制动器
...
在图象区显示不同类别的内容... 本帖最后由 作者 于 2008-2-18 13:39:57 编辑 <br /><br /> <p>幻灯片要自己指定,如a.sld，必须在AutoCAD搜索路径下,那么代码就写成</p><p> (setq data '(("a.sld" "村界跳绘" "(cmd1)")</p><p> ...<br/> )<br/> )</p><p>如果是幻灯库,如mylib.slb中包含a.sld就要写成:</p><p> (setq data '(("mylib(a)" "村界跳绘" "(cmd1)")<br/> ...<br/> )<br/> )</p><p>关于幻灯片及幻灯库的作法请查看AutoCAD帮助!</p> 本帖最后由 作者 于 2008-2-18 14:23:26 编辑 <br /><br /> 我的是<strong><font color="#ff0000">AutoCAD 2004 迷你版</font></strong>,帮助没有说,没法了,不会做幻灯片sld, <p>建立幻灯片用命令:mslide(即将打开的dwg文件以快照的形式保存).</p><p>生成*.sld文件后,若想建立幻灯库*.slb,只需要两句话，方法如下:</p><p>1.建立目录C:\1,并将所有*.sld文件放在该目录下；</p><p>2.在目录C:\1中建立a.bat文件,内容为:</p><p>dir *.sld /b > C:\1\mylist<br/>"C:\Program Files\AutoCAD 2004\slidelib.exe" C:\1\mylib.lib < C:\1\mylist</p><p>3.运行a.bat就可以生成幻灯片库了!</p><p>注意:slidelib.exe路径要视AutoCAD的安装目录而定!</p> 谢谢了,<p> </p> <p>好,可以作图库啊</p><p>可惜不懂编程，不知道怎么将其插入到图中</p><p>(("scsl(SCSL101)" "村界跳绘" "(cmd1)")</p><p>将其中的cmd1改为.insert好像不能完成</p><p>请版主讲解一下</p>