[编程申请]：在R14下如何用LISP删除指定文件

WHGF · 发表于 2005-12-1 09:04:31

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

×

内容如题，我要在R14下解决这个问题。请各位高手指点出招！
先谢谢！

两天了，没人回帖?

xshrimp · 发表于 2005-12-13 10:28:11

(vl-file-delete filename)

zxq0220 · 发表于 2005-12-13 10:38:05

(command "sh" (strcat "del " filename))

露水2 · 发表于 2005-12-13 11:04:22

你想删除什么
下面这个是删除文字
想删除什么把TEXT改成什么就可以了

(defun c:ET()
(setq ss (ssget '((0 . "TEXT"))))
(command "erase" ss "")
)

zxq0220 · 发表于 2005-12-13 12:32:48

最初由露水2 发布
[B]你想删除什么
下面这个是删除文字
想删除什么把TEXT改成什么就可以了

(defun c:ET()
(setq ss (ssget '((0 . "TEXT"))))
(command "erase" ss "")
)

[/B]

人家要删除磁盘上的文件，不是CAD中的文本。

WHGF · 发表于 2005-12-14 08:35:45

二楼用的是R14以后的版本...与要求有出入
三楼的内容是我要的，先谢谢每位参与讨论的朋友。
按三楼的试试。应该可以

账号		自动登录	找回密码
密码			立即注册