mostafa badran 发表于 2022-7-5 23:21:53

创建幻灯片图像

大家好,
我试图创建幻灯片图像,但我失败了你能帮我使我成功地完成这一步,请参阅附件。
谢谢你的帮助。
 
SLD。拉链

ReMark 发表于 2022-7-5 23:32:57

有什么问题吗?是用MSLIDE命令吗?

mostafa badran 发表于 2022-7-5 23:38:57

感谢您的回复,
你看到附件了吗?我创建了幻灯片、块、DCL和lisp文件,我们还缺少什么来完成这项任务?

hmsilva 发表于 2022-7-5 23:51:10

嗨,穆斯塔法,
看看附件是否有帮助。
 
亨里克
MySlideImages_h.zip

BIGAL 发表于 2022-7-5 23:53:53

使用@和$作为变量名的一部分表示警告可能会导致各种问题,只需使用Slide1等

mostafa badran 发表于 2022-7-6 00:01:02

感谢Henrique的回复,
你的示例很好,你可以发布步骤和动作插入功能来选择一张幻灯片,我选择它作为一个块插入。

hmsilva 发表于 2022-7-6 00:13:23

不客气,莫斯塔法。
 
您应该遵循BIGAL的建议,并更改变量的名称。
插入块。您可以使用测试return$的返回

(if (> Return$ 0)
(MyInsert (nth Return$ Slides@))
);; of

并添加一个子例程来执行insert命令

(defun MyInsert (blk)
(if (or (tblsearch "block" blk)
(findfile blk)
);; or
(command "-insert" blk pause "" "" pause)
   (princ (strcat "\n" blk " could not be found!"))
   );; if
);; MyInsert


 
 
HTH公司
亨里克

mostafa badran 发表于 2022-7-6 00:15:15

谢谢Henrique&BIGAL。
这太棒了,而且更清晰了。现在它可以完美地工作了:)
我的问候。
莫斯塔法

hmsilva 发表于 2022-7-6 00:26:55

不客气,莫斯塔法。
很高兴我能帮忙
 
亨里克
页: [1]
查看完整版本: 创建幻灯片图像