---

Hallo!

Gibt es eine Möglichkeit, im DWGeditor die linke untere Ecke der "Boundingbox" zu ermitteln? Mit Boundingbox meine ich ein (rein virtuelles) Rechteck, welches alle Elemente umschließt.

Ich würde gerne per Makro alle Elemente so verschieben, daß dieser virtuelle Eckpunkt auf 0,0,0 liegt.

ciao
Detlef

------------------
--
Detlef Jockheck
djockheck@gauselmann.de

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

---

Hallo djockheck,
hab im DWGeditor-Menü den Punkt "Lisp" gesehen. Evtl. gibt´s ein AutoCAD-Makro, welches das Gewünschte erreicht, wenn das dann noch im DWGeditor liefe ...

HTH!

------------------
Johannes Anacker
Sales Support
SolidLine AG
SolidLine AG - Supportportal

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

---

Hallo Detlef

Standardlösung hab ich leider auch keine.
Aber, was willst Du damit bewirken?
Du könntest Dir auch ein Benutzerkoordinatensystem erstellen,
bei dem Du einfach den Ursprung entsprechend verschiebst und nicht umgekehrt.

Grüße
Heinz

------------------
Grüße
Heinz

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

---

Hallo!
hier findest Du eine kleine Beschreibung des eigentlichen Gesammtproblems:
 http://ww3.cad.de/foren/ubb/Forum2/HTML/012466.shtml

ciao
Detlef

------------------
--
Detlef Jockheck
djockheck@gauselmann.de

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

---

Hallo nochmal

hast Du schon versucht den Ursprung im DWGEditor zu verschieben,
die Zeichnung zu speichern und in ECAD zu öffnen?

Grüße
Heinz

------------------
Grüße
Heinz

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

---

Hallo Heinz,

das habe ich bereits erfolgreich durchgeführt. Nun möchte ich dieses gerne automatisieren.

Da der Offset jedoch nicht konstant ist muß ich wohl über den Umweg einer BoundingBox gehen, falls der DWGeditor das hergibt.

ciao
Detlef

------------------
--
Detlef Jockheck
djockheck@gauselmann.de

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

---

Hallo

genügt nicht einfach die Eingabe eines Eckpunktes
wie Du es in Deinem anderen Posting beschrieben hast?
Wenn ja dann hätte ich folgenden LISP Code für Dich

(defun C:MOV_ORG ( / )
  (if (setq p1 (getpoint "\n0-Punkt: "))
    (progn
      (command "UCS" "P" p1)
      (command "FILEDIA" "OF")
      (command "qsave")
      (command "FILEDIA" "ON")
    )
  ) 
)

Die paar Zeilen kopierst Du in eine Textdatei mit der Endung LSP.
Im DWGEditor lädst Du das mit z.B.:
(load "C:/temp/dateiname")
und dann starten mit
mov_org   

Du kannst das Laden und Starten auch in die Symbolleiste integrieren
Ev. noch gleich das Schließen der Zeichnungsdatei in das Makro integrieren.

------------------
Grüße
Heinz

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

---

Hallo Heinz!

Vielen Dank! Leider hat der Code noch ein kleines Schönheitsproblem.
1. ich lade die Zeichnung
2. ich markiere alles
3. ich gebe eine mov_org
4. ich markiere mit der Maus den zukünfigen Nullpunkt (hier ein gefangener Linien-Endpunkt)
5. es passiert .... nichts :-(

Was mache ich falsch?

ciao
Detlef

------------------
--
Detlef Jockheck
djockheck@gauselmann.de

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

---

Hallo

es passiert schon etwas und Du machst auch nichts falsch :-)
1.) Du brauchst nicht zu markieren
2.) Nachdem Du den 0-Punkt gewählt hast wird der Koordinatenursprung auf diesen Punkt verschoben und die Datei gesichert
d.h. Du wirst nichts sehen, außer wenn Du Dir das Koordinatenkreuz anzeigen lässt, dass es sich verschoben hat.

Du kannst das überprüfen indem Du eine Linie von 0,0 bis z.B. 100,100 vor dem Start des Makros machst und danach.
Dann wirst Du sehen, dass sich der 0-Punkt verschoben hat.

Grüße
Heinz

------------------
Grüße
Heinz

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