---

Hallo,

ich hänge hier an einem Punkt, bei dem ich einen Bug seitens Acads vermute.

Ich kann mit (vla-StartUndoMark ActDoc) oder auch mit (command "_undo" "_g") die Gruppierung weiterer Schritte beginnen. und auch mit (vla-EndUndoMark ActDoc) oder mit (command "_undo" "_e") die Befehlsgruppierung abschließen.

Habe ich nun ein
(align ...) [vorhar habe ich natürlich die (arxload "geom3D.arx")geladen] dazwischen, hat die Gruppierung irgendwie keinen Bestand mehr. Soll heißen, ich muss dann alle Schritte einzeln zurück gehen :

Könnt Ihr das mal nachvollziehen und ggf. bestätigen (ich teste hier an Acad 2006)
Das ganze ist an meinem System auch in der Befehlszeile nachzuvollziehen. Deshalb reicht es, wenn man dort einfach mal ein paar Befehle in einer UndoGroup zusammenfasst und schaut was wird beim Zurück-'gehen' alles rückgängig gemacht, wenn ein _align bei den Befehlen dabei war und was wenn nicht.

Grüße Holger

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

Ich bin dabei: CAD.de Anwendertreffen vom. 20. - 22.09.2006

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

---

Hallo Holger,

Es ist wohl so, das Align die Gruppe Zerlegt. Habs im ADT 2006 und AutoCAD 2007 getestet. Bei beiden wird die Befehlsgruppe durch den Befehl _align zerlegt.

Gruß, Carsten

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

---

Hilfts dir, wenn ich das in 2002 teste?

;D

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

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

---

@Carsten Danke!
@CADwiesel - Nein.

Dann sieht es wohl tatsächlich so aus wie oben beschrieben 

Grüße Holger

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

Ich bin dabei: CAD.de Anwendertreffen vom. 20. - 22.09.2006

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

---

Ich habs mal mit AutoCAD 2007 getestet. Für mich stellt es sich so dar, als wenn _ALIGN selbst ein _UNDO _g aufruft und daher eine schon bestehende geöffnete _UNDO _group Gruppierung automatisch abschließt.

Also _UNDO _G
3 x _LINE
_ALIGN (die 3 Linien)
_UNDO _E

_u (_Align rückgängig = Gruppe)
_u (nichts passiert = leere Gruppe)
_u ( 3 Linien rückgängig = Gruppe)

------------------
Mit freundlichem Gruß

Udo Hübner

[Diese Nachricht wurde von CAD-Huebner am 22. Aug. 2006 editiert.]

[Diese Nachricht wurde von CAD-Huebner am 22. Aug. 2006 editiert.]

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

---

Mit dem ALIGN-Befehl hatte ich schon mehrere Probleme (bei mehrfachem Aufruf gibt es eine Fehlermeldung), so dass ich versucht habe, ihn mit normalem AutoLISP nachzubilden - und damit wird er natürlich auch durchschau- und beherrschbar...

Code:

---

(defun C:XALIGN(/ satz 0-0-0 p1 p2 p3 q1 q2 q3
hl1 hl2 hl3
ep2 ep3)
;scj.schulz@t-online.de
(setq 0-0-0 (list 0 0 0))
(prompt"\nSelect Elements: ")
(setq satz (ssget))

(command "_UCS" "_W")
(setq P1 (getpoint "\nSELECT Startpoint 1: "))
(command "_point" p1)
(setq Q1 (getpoint "\nSELECT Targetpoint 1: "))
(command "_point" q1)
(command "_line" p1 q1 "")
(setq hl1 (entlast))

(setq P2 (getpoint "\nSelect Startpoint 2: "))
(command "_point" p2)
(setq ep2 (entlast))
(setq Q2 (getpoint "\nSELECT Targetpoint 2"))
(command "_point" q1)
(command "_line" p2 q2 "")
(setq hl2 (entlast))

(setq P3 (getpoint "\nSelect Startpoint 3: "))
(command "_point" p3)
(setq ep3 (entlast))
(setq Q3 (getpoint "\nSELECT Targetpoint 3"))
(command "_point" q3)
(command "_line" p3 q3 "")
(setq hl3 (entlast))

(command "_move" satz ep2 ep3 "" p1 q1)
(command "_erase" hl1 hl2 hl3 "")
(setq p2 (cdr (assoc 10 (entget ep2))))
(command "_ucs" "_3p" q1 q2 p2)
(command "_rotate" satz ep3 "" 0-0-0 "_R" 0-0-0 (trans p2 0 1) (trans q2 0 1))
(command "_UCS" "_w")
(command "_ucs" "_ZA" q2 q1)
(setq p3 (trans (cdr (assoc 10 (entget ep3))) 0 1))
(command "_rotate" satz "" 0-0-0 "_R" 0-0-0 p3 (trans q3 0 1))
(command "_erase" ep2 ep3 "")
(command "_UCS" "_W")
(princ)
); end xalign.lsp

---

Mit besten Grüßen aus der Rhön
Jochen
www.black-cad.de

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

---

Hallo Jochen,

gleich mit code .. das ist super, sonst hätte ich mich das Rad noch mal erfinden müssen -> :top!

Danke!

Holger

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

Ich bin dabei: CAD.de Anwendertreffen vom. 20. - 22.09.2006

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