明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2613|回复: 18

在lisp中如何新建一个目录

  [复制链接]
发表于 2002-8-23 09:18 | 显示全部楼层 |阅读模式
在lisp中有对文件操作的函数,却没有发现对目录操作的函数。
有谁知道如何可以建立一个新目录方法,请告知。
发表于 2002-8-23 10:33 | 显示全部楼层

用DOSLIB中的(DOS_MkDir 路径)函数,祥见《Visual LISP for AutoCAD 2002——技巧与

用DOSLIB中的(DOS_MkDir 路径)函数,祥见《Visual LISP for AutoCAD 2002——技巧与范例》第五章[br]
 楼主| 发表于 2002-8-23 13:44 | 显示全部楼层

谢谢您的指导,可是谢谢您的指导,可是我这里找不doslib,请问在哪里能找到呢?

发表于 2002-8-23 14:51 | 显示全部楼层

您是真够懒的了... http://www.mcneel.com/cgi-bin/download.cgi?doslib

 楼主| 发表于 2002-8-23 15:37 | 显示全部楼层

非常感谢您的帮助。

发表于 2002-8-25 10:35 | 显示全部楼层

VLisp现在支持ActiveX,可以直接调用Windews Shell和FileSystemObject对象。

磁盘、文件、目录之类操作用Vlisp都可以直接完成,不必再用额外的程序。
发表于 2002-8-28 09:16 | 显示全部楼层

(vl-mkdir (strcat "c:\\test\\" a "\\" b "\\"))

 楼主| 发表于 2002-8-28 10:38 | 显示全部楼层

十分感谢,这个方法真的不错!

十分感谢,这个方法真的不错!
可是我好像从来没有见过这个函数,CAD的帮助里也没有它。
不知道为什么。
发表于 2002-8-28 10:54 | 显示全部楼层

谢谢秋枫,可是,您怎么挖出这个函数的呢?

发表于 2002-8-29 09:14 | 显示全部楼层

哈,你不说我还真没注意vlisp help中没有提到过这个函数。这么有用的函数居然提也不

哈,你不说我还真没注意vlisp help中没有提到过这个函数。这么有用的函数居然提也不提。怪事。见内[br]我是从google上找到的
http://groups.google.com/groups?hl=zh-CN&lr=&ie=UTF-8&oe=UTF-8&threadm=B34D9DDB4F6A7E4393EA35DD4888BC17%40in.WebX.maYIadrTaRb&rnum=1&prev=/groups%3Fq%3Dlisp%2Bcreate%2Bfolder%26hl%3Dzh-CN%26lr%3D%26ie%3DUTF-8%26oe%3DUTF-8%26selm%3DB34D9DDB4F6A7E4393EA35DD4888BC17%2540in.WebX.maYIadrTaRb%26rnum%3D1

另外他们还提到一些函数

  1. (vl-bt-off) ;;; turn previous backtrace off
  2. (vl-bt-on) ;;; start the backtrace
  3. (vl-bt) ;;; call the backtrace status
  4. (vl-bt-off) ;;; turn it off

  5. Others...
  6. (_ver)
  7. "RTS v.5.0a0-19b"
  8. (_vl-times)
  9. (4690031 . 692) ;; no idea of this...
复制代码


  1. VL-INFP
  2. VL-INIT
  3. VL-NANP
  4. acad-push-dbmod
  5. acad-pop-dbmod
  6. (vlisp-import-symbol 'my-symbol)
  7. VLISP-COMPILE-LIST
  8. VLISP-DCLRES-LIST
  9. VLISP... and most of the rest of this...
复制代码

具体用途我也不是很清楚。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-5-2 22:13 , Processed in 0.303087 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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