找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 582|回复: 0

[求助] 如何使用Mslide和Slide_image?

[复制链接]
发表于 2020-3-31 16:53:01 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
如题:Mslide和Slide_image命令应该如何使用?
Mslide命令可能将当前模型或视口或布局的图形输出到AutoCAD幻灯片文件。
Slide_image可以将AutoCAD幻灯片文件显示到对话框中。
这个基本功能倒是做到了,代码如下:

以下是创建AutoCAD幻灯片文件的代码:
  (command "zoom" "e")
  (command "mslide" "D:\\DEV\\AUTOLISP\\test.sld")
  (command "mslide" "D:\\DEV\\AUTOLISP\\test2.sld")
  (command "mslide" "test3")

以下是将幻灯片加载到对话框控件中的代码:
  (start_image "border")
  (slide_image 0 0 (- width 1)(- height 1) "D:\\DEV\\AUTOLISP\\test2.sld")
  (end_image)

但问题是,上述代码不能保证生成的幻灯片在对话框中的效果:
一是mslide生成的幻灯版包含绘图窗口中的空白部分,影响幻灯片在对话框中的位置,不能居中或充满控件。
二是slide_image命令好像也没有控制显示位置的参数,前四个参数只是设置了个显示区域,好像不能作充满或拉伸处理。
三是对话框中Width和Height两个属性值的单位代表多少,有人说16PX,但我测试了下,好像也不是。
不知道这两条命令应该如何使用才能得到幻灯片居中或充满控件的效果。
以下是我的两个文件的代码:
DCL:
f_img:dialog
{
        label="线型选择测试";
        :row{
        :text
        {
                label="123";
        }
        :image_button
        {
                label="图例";
                key="border";
                height=3;
                width=16;
                fixed_height=true;
                fixed_width=true;
                alignment="centered";
//                alignment="left";
        }
        }
        ok_only;
}

LSP:
(defun c:img()
  (command "zoom" "e")
  (command "mslide" "D:\\DEV\\AUTOLISP\\test.sld")
  (command "mslide" "D:\\DEV\\AUTOLISP\\test2.sld")
  (command "mslide" "test3")
  (setq dcl_id (load_dialog "dcl/f_img"))
  (new_dialog "f_img" dcl_id)
  (setq width  (dimx_tile "border")

     height (dimy_tile "border"))

  (start_image "border")
  (slide_image 0 0 (- width 1)(- height 1) "D:\\DEV\\AUTOLISP\\test2.sld")
  (end_image)
  (start_dialog)
  )



论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-11-14 20:18 , Processed in 0.276281 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表