joe
Guest
hi, in der folgenden lisp die Funktion in fett nicht mehr das Ergebnis zurückgibt, geben Sie mir eine Lösung bitte. autocad 2019
(Defun c
p3)
(vl-load-com)
(setq ps 0,00000785)
(setq vol (vla-get-volume)vlax-ename->vla-object (Auto)
(setq pt (* ps vol)
(Print (Strcat "il peso è di kg..." (rtos pt))
(princ)
)
(Defun c

(vl-load-com)
(setq ps 0,00000785)
(setq vol (vla-get-volume)vlax-ename->vla-object (Auto)
(setq pt (* ps vol)
(Print (Strcat "il peso è di kg..." (rtos pt))
(princ)
)