Hallo !
Folgender Code zum horizontalen Teilen des Modelles funktioniert in AutoCAD (2011), BricsCAD (V12) verweigert jedoch und bringt die Meldung:
; error : Automation Error 80020009; [IAcadViewport] Error accessing [SPLIT] method. ErrIndex=0;
Code:
(defun C:VP-Split ()
(setq do (vla-get-ActiveDocument (vlax-get-Acad-Object))
vc (vla-get-Viewports do)
cp (getvar "viewctr")
vh (* (getvar "viewsize") 0.5)
)
(if (eq (getvar "ctab") "Model")
(progn
(setq nv (vla-Add vc "NewPort"))
(vla-Split nv acViewport2Horizontal)
(vla-put-ActiveViewport do nv)
(vla-ZoomCenter (vlax-get-Acad-Object) (vlax-3d-point cp) vh)
(setvar "cvport" (1+ (getvar "cvport")))
(vla-ZoomCenter (vlax-get-Acad-Object) (vlax-3d-point '(0 0 0)) 10.0)
)
)
(princ)
)
Habe die Methode auch mit -invoke probiert, leider erfolglos.
Bleibt also nur mehr die unpopuläre COMMAND-Funktion mit dem Befehl _VPORTS bzw. ist das Problem in einer der jüngeren Versionen bereits behoben ?
MfG
Arcuso
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP