CreateLabel method

CreateLabel method

Anonymous
Not applicable
489 Views
0 Replies
Message 1 of 1

CreateLabel method

Anonymous
Not applicable

No matter which way I approach using the CreateLabel method to place a free standing label I receive errors.

I have been using the CreateLink method for some time, and it works fine.

 

Any insights to this would be much appreciated.

 

 

 

 

(setq link-result (vlax-invoke-method objLinktemplate "CreateLabel" objKeyvalues objLabeltemplate nil))


; error: ActiveX Server returned an error: Type mismatch


      
(setq link-result (vlax-invoke-method objLinktemplate "CreateLabel" objKeyvalues labeltemplate-name nil))


; error: lisp value has no coercion to VARIANT with this type:  "POLE-NO"

 


(setq link-result


  (vlax-invoke-method objLinktemplate "CreateLabel" objKeyvalues (vlax-make-variant linktemplate-name

vlax-vbString) nil)
)


; error: lisp value has no coercion to VARIANT with this type:  #<variant 8 POLE>

 


(setq link-result (vl-catch-all-apply


  'caom-CreateLabel (list objLinktemplate obj-id objKeyvalues labeltemplate-name nil)


))


; error: Exception occurred: 0xC0000005 (Access Violation)
; warning: unwind skipped on unknown exception

 


(setq link-result (vl-catch-all-apply
  'caom-CreateLink (list objLinktemplate obj-id objKeyvalues)
))


;works fine

0 Likes
490 Views
0 Replies
Replies (0)