你好,我花了5个小时看这个,请停止我的痛苦。
- (defun tempList (theObject / item dwgName) ;;;i[color="red"]tem here is nil,object acaddocuments[/color]
- (vl-load-com)
- (setq theList '())
- (vlax-for item theObject
- [color="red"] (setq dwgName (vlax-get-property item 'Name)) ;;;main question is in this line.
- 1.how can i see this item in "(vlax-get-acad-object", everything is here right?),before calling its property.I'm using a watch to see whats happening.
- 2.can you please tell me what do you think i should know on this issue[/color]
- (setq theList (append (list dwgName) theList))
- )
- (setq theList (reverse theList))
- (princ)
- );defun
- (setq acadObject (vlax-get-acad-object))
- (setq acadDocuments (vla-get-documents acadObject))
- (tempList acadDocuments)
|