无聊发布CAD版本转换以及去除教育版戳记程序源代码

chlh_jd

这个函数是CAD2010等支持64位WIN7系统的ACAD自带的VLISP函数

wangph

chlh_jd 发表于 2012-9-24 18:40
这个函数是CAD2010等支持64位WIN7系统的ACAD自带的VLISP函数

还没有用过64bitCAD，为什么32bitCAD中没有dcl_MultiFileDialog函数呢？

iceberg2509

lingduwx 发表于 2012-8-15 12:14
顶你了楼主，版本转换对于用低版本CAD软件非常实用，主要是现在的高版本软件使用越来越慢了，
不过请问楼主 ...

MSComDlg.CommonDialog为xp系统自带，win7下没有的。所以不能运行。

iceberg2509

chlh_jd 发表于 2012-8-15 00:54
这个还是比较给力的！
缺少AddSeprate函数，getmutifiles不支持64位系统的，可以用下面这个

Addseprate函数功能如同阁下所猜想，不过你的函数有问题。

iceberg2509

ORCHI 发表于 2012-9-20 17:36
no function definition: MAKELIST
是不是还缺makelist函数呢

(defun makelist        (str pat / i j n lst)
;;生成表记录函数：把字符串变为表
  (cond
    ((/= (type str) (type pat) 'STR))
    ((= str pat) '(""))
    (T
     (setq i 0
           n (strlen pat)
     )
     (while (setq j (vl-string-search pat str i))
       (setq lst (cons (substr str (1+ i) (- j i)) lst)
             i         (+ j n)
       )
     )
     (reverse (cons (substr str (1+ i)) lst))
    )
  )
)

652758365

很佩服楼主，

请问

命令: DwgConverter
; 错误: *error* 函数中出错AutoCAD 变量设置被拒绝: "acadlspasdoc" nil

命令:

请问如何处理，谢谢。

iceberg2509

652758365 发表于 2012-10-5 21:50
很佩服楼主，

请问

这个程序只能在未保存的文件中运行。

cjcak47

不错啊！谢谢楼主

手表上的你

好程序啊，打印的时候被那个戳记烦得不行

jiheng

正在认真学习中。。。。