---

Hallo Ihr,
ich habe ein Layout, welches ein Ansichtsfenster enthält kopiert (Neues Layout)
In dem Ansichtsfenster ist ein Objekt im Modellbereich zu sehen.
Nun kopiere ich dieses Objekt an eine andere Stelle im Modellbereich.

Jetzt kommt der Punkt....
in meinem, bereits vorher kopierten Layout mit dem Ansichtsfenster (neues Layout), möchte ich jetzt die gleiche Sicht auf das kopiere Objekt haben, wie es das 'alte' Ansichtsfenster auf das 'alte' Objekt hat.

Das Ganze soll aber nicht über commands oder Wechseln in die Layouts. oder AF's funktionieren, sondern Programmtechnisch ver Lisp/Vlisp.
In meinen händischen Versuchen ist mir aufgefallen, das der einzige Unterschied zwischen den beiden AF's der dxf 12 ist.
Ich weiß allerdings nicht, wie ich diesen Punkt zu berechnen habe, geschweige denn, was er überhaupt bedeuten soll.

Ich wäre für jegliche Hinweise zur Berechnung oder eben Neuausrichtung des AF's dankbar.

------------------
Gruß
CADwiesel
Besucht uns im CHAT

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,
12 zeigt dir den Fenster-Mittelpunkt den musst du auf dein neues Objekt ausrichten.

Code:

---

(setq CenterVP-1 (mapcar '+ VIEWP-1-GC17 VIEWP-1-GC12))
    (setq CenterVP-2 (mapcar '+ VIEWP-2-GC17 VIEWP-2-GC12))

---

------------------
Gruß Wolfgang 

[Diese Nachricht wurde von Meldin am 06. Okt. 2022 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

soweit ich das verstehe musst du ja "nur" den Mittelpunkt der Ansicht verändern.
Das sollte (ungetestet) prinzipiell mit VLA-PUT-CENTER gehen???

Nach meiner Erfahrung ist es bei VIEWPORTS leider sehr undurchsichtig, wie die korrekten Koordinaten zu ermitteln sind.
Siehe: http://www.lee-mac.com/vpoutline.html

Gruß

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo CADwiesel,

wenn du das Verschieben ebenfalls mit dem Programm erledigst, hast du ja den Basis und den Zielpunkt, sprich den Verschiebevektor (Differenz aus den beiden Punkten).
Diesen addierst du zum [Mittelpunkt der Ansicht im Modellbereich] = 12er-Gruppencode hinzu, sollte gehen.

Schwieriger wird's ggf. herauszufinden, um welches Ansichtsfenster es sich handelt, in dem das Objekt zuvor dargestellt wurde. Dazu müsstest du über die Ansichtsfenster-Daten ermitteln, welcher Bereich im Modellbereich dargestellt wurde um dann zu prüfen, ob das relevante Objekt in diesem Fenster sichtbar wäre (die Layereinstellungen des Ansichtsfenster müsste man ggf. auch noch beachten) - dafür wäre dann die Boundingbox des Objekts ein Weg.

Aber bevor ich mich hier in Eventualitäten verstricke ... werde mal konkreter, welchen Weg du gehen willst und wo es stockt.

Grüße!
Holger

------------------
Holger Brischke
CAD on demand GmbH
Individuelle Lösungen von Heute auf Morgen.

defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Also eigentlich braucht man nur den Zoom center um den Verschiebevektor auf das Ansichtsfenster anzuwenden und schon passt's.
Was für Objekte in der Draufsicht und Frontansicht auch gut passt.
Wenn ich jetzt allerdings eine Seitenansicht eines Objektes habe, funktioniert es mit dem Zoom center auf einen berechneten Punkt nicht.
Ich weiß nicht warum, aber ein solcher Punkt wird nicht übernommen. Das Ansichtsfenster behält da immer den 'alten' Zentrumspunkt.

Vielleicht fällt ja dazu noch jmd. etwas ein?

Code:

---

(setq vec (mapcar '- p2 p1))
(setq vs (getvar 'viewsize))
(setq vc (getvar 'viewctr))
(setq nvpt (mapcar '+ vc vec))
(vlax-invoke-method (vlax-get-acad-object) 'zoomcenter (vlax-3d-point nvpt) vs)

---

------------------
Gruß
CADwiesel
Besucht uns im CHAT

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Müsstest du den Vektor nicht auf das Ansichtsfenster umrechnen?
Ich hätte hier irgendwas mit "trans" erwartet.

PCS2WCS oder so ähnlich

------------------
Mfg Heiko

Elefantenjagd in Afrika
"... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
-Lots of irritating superfluous parentheses!-

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Wenn ich im jeweiligen AF auf WKS stelle gehts.
Kann sein dass da ein wenig "trans" vielleicht hilft.

Allerdings ... du hast geschrieben

Zitat:

---

oder Wechseln in die Layouts. oder AF's funktionieren

---

da musst du wahrscheinlich mit eigenen Methoden die Koordinaten umrechnen.
Aber wenn du sowieso nicht in die AF wechseln willst, kannst du ja auch nicht mit getvar arbeiten, das muss ja dann alles ganz anders aussehen.
Wenn du das hast, stells mal bitte hier rein. Ich versuch auch schon lange "von Außen" zu panen und zu zoomen, bis jetzt klappts nicht.

------------------
Geht nicht, gibts nicht

Gruß
Andreas

http://kraus-cad.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Bei den Ansichten von einer Seite links/rechts muss sicherlich ein anderer Ansichtspunkt und Vektor im Modellbereich ermittelt werden.
Das Ganze sollte aber ohne hin- und herwechseln der Bereiche funktionieren. Dauert sonst einfach zu lange.
Muss mir mal bei Gelegenheit Gedanken darüber machen.

------------------
Gruß
CADwiesel
Besucht uns im CHAT

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hast du dir den Code von gile aus dem link mal angesehen...
"...Without activating a viewport..."

------------------
Mfg Heiko

Elefantenjagd in Afrika
"... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
-Lots of irritating superfluous parentheses!-

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ein Punkt alleine sagt dir doch noch nichts über den Vektor aus, sonst wäre es ja ziemlich einfach.
Aber danke für das Dranbleiben ;-)

------------------
Gruß
CADwiesel
Besucht uns im CHAT

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP