明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1162|回复: 4

[求助]如何LIST出目前開啟的所有檔案名

[复制链接]
发表于 2008-3-13 10:25 | 显示全部楼层 |阅读模式

ACAD有開啟多文本功能,如果我開啟9個CAD 檔,

可有辦法用LISP得知我開啟了哪些檔案,

或得知某CAD檔是否開啟中,即1.DWG 已開啟

用LISP 程序開啟1.DWG時,先確認1.DWG是否已開啟,

若已開啟則停止執行程序

发表于 2008-3-13 12:37 | 显示全部楼层
(defun test (/ lst)
  (vlax-for n (vla-get-documents (vlax-get-acad-object))
    (setq lst (cons (vla-get-name n) lst))
  )
)
 楼主| 发表于 2008-3-14 09:01 | 显示全部楼层
本帖最后由 作者 于 2008-3-14 9:12:48 编辑

謝謝你的幫助!!

解決我的問題

但不知是否有包含路徑的作法,即 ("c:\dwg\1.dwg" "c:\dwg\abc\2.dwg" "c:\dwg\ddd\3.dwg")

发表于 2008-3-14 13:23 | 显示全部楼层
(defun test (/ lst)
  (vlax-for n (vla-get-documents (vlax-get-acad-object))
    (setq lst (cons (strcat (vla-get-path n) "\\" (vla-get-name n)) lst))
  )
)
 楼主| 发表于 2008-3-14 14:55 | 显示全部楼层

謝謝大俠的指導

為什麼在ACAD中查找不到"VLA-..."等等的指令

在VLISP也沒有說明奇怪

 

 

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-5-2 10:26 , Processed in 0.385027 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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