王咣生 发表于 2003-12-29 14:03:00

整理来自acadx的VLISP程序库

vlex-function.
其中debug nil的函数没有调试成功.其它的函数如果有什么问题,我们可以讨论.

加载后,运行(vlex-help)查看所有函数.


问题:
;;;**************************************************************************************;;;
;;; MODULE:    vlex-ActivePlotConfig ()                                                             ;;;
;;; Purpose:   Returns object to active plot configuration                              ;;;
;;; Debug:   nil                                                                       ;;;
;;;**************************************************************************************;;;

(defun vlex-PlotConfigs ( / pc out)
(vlax-for each (vlax-get-property (vlex-ActiveDocument) 'PlotConfigurations)
    (if (vlax-property-available-p each 'GetPlotDeviceNames)
      (setq out (cons (vlax-get-property each 'GetPlotDeviceNames) out))
    )
    (setq itemname (vlex-Name each)
          out (cons itemname out)
    )
)
out
)
这个函数有问题,如何获得所有的'GetPlotDeviceNames列表?

f4800 发表于 2020-11-1 07:04:34

学习学习学习一下！

waterchen 发表于 2009-6-27 12:29:00

好東西啊，正是我想的，學習中

wu6768209 发表于 2009-7-2 20:47:00

加载后，怎么不能运行啊！老是说未知命令

yanghc 发表于 2009-11-4 17:12:00

<p>下载来学习学习</p><p></p>

kkk3kkk 发表于 2009-11-12 16:46:00

<p>看不出来</p>

lqss 发表于 2009-11-13 17:07:00

看不见！

894560869 发表于 2010-11-1 11:38:00

<p>E文差，所以又不知道什么用途，要是有中文注解有多好啊</p>
<p>&nbsp;</p>

chwind 发表于 2010-11-6 14:44:00

看不懂

578749467 发表于 2010-11-8 18:14:00

谢谢楼主分享

hhh454 发表于 2010-11-8 19:28:00

下载下来看看，先感谢楼主分享
页: [1] 2
查看完整版本: 整理来自acadx的VLISP程序库