weedseed85 发表于 2022-7-6 07:38:41

显示文件资源管理器Lip

尊敬的autocad用户/lisp编写人员:,
 
谁能帮帮我吗。
 
这是我写的。lisp文件
 
(defun c:x x();将外部参照放置到右侧图层;编辑该行,否则它会显示一个愤怒的微笑
(命令“-layer”“Make”“Xref”“color”“8”“Xref”“”)
(命令“-Xref”“Attach”“0,0”“1”“1”“0”)
)
 
在第二个(命令)行中,我希望它附着外部参照文件并
我想让它问我要放什么文件。
否则我就得写很多口吃。。。
 
有没有办法让它显示文件浏览器?
 
我希望有人能帮我解决这个Lisp程序的问题。
提前谢谢。
 
问候,
米歇尔

MSasu 发表于 2022-7-6 08:01:12

要允许用户选择文件,请选中GetField函数。
 
此外,请编辑您的帖子并添加所需的代码标签。非常感谢。

weedseed85 发表于 2022-7-6 08:09:56

谢谢你的回复。
我试着按照你的要求编辑代码部分。但是我找不到正确的方法。
 
我用红色标记了它。希望现在可以接受。
 
再次感谢。

MSasu 发表于 2022-7-6 08:25:36

编辑帖子时,请检查是否有一个名为Go Advanced的按钮-它将在编辑器中打开帖子,并提供更多选项;在那里选择代码部分并检查标记为#的工具栏按钮。当你发布一条新消息时,这个按钮在基本编辑器中也可用。
或者可以手动放置标签:只需在代码末尾写下“”,然后
" at beginning.

weedseed85 发表于 2022-7-6 08:37:04

我非常感谢你的帮助。
 
这是我代码的最终结果。也许它也用于
其他人。
 
 
(defun c:xx () ;Zet Xref op juiste laag

(command "-layer" "Make" "Xref" "color" "8" "Xref" "")
(command "-Xref" "Attach" (getfiled "Select Reference File" "K:\Tekeningenbeheer" "dwg""0,0" "1" "1" "0" "")

(command "-layer" "set" "0" "")
)
 
玩得高兴
 
问候,
米歇尔

SLW210 发表于 2022-7-6 08:39:15

请编辑您的第一篇文章,包括代码标签!!
页: [1]
查看完整版本: 显示文件资源管理器Lip