---

hallo zusammen

gibt es mit vba / com die möglichkeit ein wipeout zu erstellen
(nicht über sendcommand)

Danke für die Tipps

------------------

gruss Oli

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

---

Für Lisp hätte ich spontan was gefunden http://www.cadtutor.net/forum/archive/index.php/t-12543.html
und für .net http://through-the-interface.typepad.com/through_the_interface/2007/12/creating-an-aut.htm
Vielleicht hilft dir dieses weiter um auch Code für VBA zu finden/entwickeln

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

Udo Hübner
www.CAD-Huebner.de

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

---

Hallo Udo

Danke für die Antwort
ich stehe noch etwas auf dem Schlauch

Code:

---

(defun add-acad_wipeout_vars (/ e)
;; By ElpanovEvgeniy
;; add acad_wipeout_vars to DICTIONARY...
;; tested acad 2005, 2007
(and
(ARXLOAD "AcWipeout.arx")
(setq
e (entmakex
(list
'(0 . "WIPEOUTVARIABLES")
'(102 . "{ACAD_REACTORS")
(cons 330 (NAMEDOBJDICT))
'(102 . "}")
(cons 330 (NAMEDOBJDICT))
'(100 . "AcDbWipeoutVariables")
'(70 . 1)
) ;_ list
) ;_ entmakex
) ;_ setq
(entmod
(append
(entget (NAMEDOBJDICT))
(list
'(3 . "ACAD_WIPEOUT_VARS")
(cons 350 e)
) ;_ list
) ;_ append
) ;_ entmod
) ;_ and
)

---

wie muss ich das Lisp aufrufen?
habe es mit add-acad_wipeout_vars probiert
was zu folgender Meldung führt

Unbekannter Befehl "ADD-ACAD_WIPEOUT_VARS". Drücken Sie F1-Taste für Hilfe.

.net bin ich leider gahr nicht fit

------------------

gruss Oli

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

---

Code:

---

(defun c:add-acad_wipeout_vars (/ e)

---

------------------
<----- Bitte Systeminfo eintragen, warum siehst du hier. "Warum Einfach es geht auch kompliziert". Schöne Grüsse aus der Steiermark  Bernd P. Sport ist Mord
Rekorde: Scalelist>11727, Fehler>34365, Layerfilter>XXXX

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

---

stehe immer noch auf dem Schlauch

muss ich es so aufrufen Befehlszeile):

(defun c:add-acad_wipeout_vars (/ e)

den kommt

(_>

------------------

gruss Oli

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

---

Hallo Oli,

Zitat:

---

Original erstellt von OliMeier:
muss ich es so aufrufen Befehlszeile):

....

---

Nein, Du musst die erste Zeile Deines Lisp-Proggis so ändern wie angegeben und dann neu laden. Das c: vor dem add-acad... bewirkt, dass dies ein aus ACAD aufrufbarer Befehl wird. Dann kanst Du mit add-acad_wipeout_vars starten.

Gruß
Thomas

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

---

Euch ist aber klar, dass das Teil keine Wipeouts erzeugt !!?????

------------------
  - Thomas -          
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

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

---

das habe ich auch gemerkt
bei mir macht es nichts erkennbares

------------------

gruss Oli

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