在影像框中显示 DWG 文件
哪位帮小弟用 ARX 写个函数在 LISP 下调用,函数功能在影像框中显示 DWG 文件,调用格式(function key dwgname) '影像框'指什么? 你要做什么呢? 是这样的,我写了个图库管理是用幻灯片来显示,我想把它改成直接预览 DWGimage_button只能显示幻灯片,如果想预览dwg,你这种dcl方法还可行吗?
我找一下arx如何预览dwg文件,如果可以,你的程序结构改动就会很大了. (progn
(print (read (strcat "SLD" (itoa nn) "=" sld_name)))
;sld_name 为幻灯片的名称
(start_image (itoa n))
(fill_image
0
0
(DIMX_TILE (itoa n))
(DIMY_TILE (itoa n))
-2
)
(end_image)
(start_image (itoa n))
(slide_image
0
0
(DIMX_TILE (itoa n))
(DIMY_TILE (itoa n))
sld_name ;显示幻灯片
)
(end_image)
)
应该还好拉,只要改动上面的就可以拉
doslib 是可以显示 DWG 文件,可是它是自己会出现一个对话框来显示 DWG 的(dos_dwgpreview "1" ""),所以不能达到我的要求. 斑竹你用过吗?我要的就是这种程序,可是不能用啊.
看我的演示文件
我已经发 MAIL 给作者了,可是被退回来了
哪位帮忙写一个怎么样? 不懂lisp帮你顶好了 使用dwgthumbnail.ocx控件来实现
页:
[1]