Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Lisp
  Reaktor für :VLR-endDwgOpen

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Reaktor für :VLR-endDwgOpen (1984 mal gelesen)
tmoehlenhoff
Ehrenmitglied V.I.P. h.c.
Gutzum, CAD-Therapeut und BIM-Priester ;-)



Sehen Sie sich das Profil von tmoehlenhoff an!   Senden Sie eine Private Message an tmoehlenhoff  Schreiben Sie einen Gästebucheintrag für tmoehlenhoff

Beiträge: 2996
Registriert: 14.10.2002

ATD 2 bis 2007

erstellt am: 14. Dez. 2004 22:22    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Spiele gerade ein bisschen mit Reaktoren rum und komme mit dem :VLR-endDwgOpen nicht klar. Hat mal jemand ein Minimalbeispiel?

sayonara
Torsten Möhlenhoff
ACAD-Systemhaus Bremen

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

mapcar
Mitglied
CADmin



Sehen Sie sich das Profil von mapcar an!   Senden Sie eine Private Message an mapcar  Schreiben Sie einen Gästebucheintrag für mapcar

Beiträge: 1250
Registriert: 20.05.2002

Time flies like an arrow, fruit flies like a banana (Groucho Marx)

erstellt am: 17. Dez. 2004 23:46    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für tmoehlenhoff 10 Unities + Antwort hilfreich

Hi Torsten,

die Frage passt gut in die Weihnachtszeit - das ist nämlich was, wo auch keiner so richtig dran glaubt;-)

Schau dir das kleine Beispielprogramm an: Es werden ein paar charakteristische DWG-reaktoren gesetzt. :vlr-beginClose funktioniert erstmal problemlos, aber :vlr-beginDwgOpen und :vlr-endDwgOpen feuern überhaupt nicht (weder in der bisherigen noch in der neuen Zeichnung). Möglicherweise tun die nur in persistenten Reaktoren was, aber kein Mensch macht sich mehr Gedanken über persistente Reaktoren, weil sowieso nichts funktioniert. Ich werde mich jedenfalls hüten, noch einen Gedanken an persistente Reaktoren zu verschwenden.

:vlr-beginSave und :vlr-saveComplete feuern zwar, aber die Hilfe stimmt nicht. Anders als in der Online-Hilfe angegeben, ist das erste und einzige Element der Parameterliste nämlich nicht der Dateiname, sondern ein COM-Objekt - die IAcadDatabase nämlich. Das mit dem Dateinamen kann auch gar nicht stimmen, denn dazu feuert beginSave viel zu spät: In dem Augenblick, da beginSave endlich feuert, ist vom User der neue Dateiname längst vergeben. Das heisst in der Praxis: beginSave und saveComplete feuern eigentlich gleichzeitig, es ist völlig egal, welchen von beiden man verwendet. Eingreifen oder Abbrechen kann man sowieso nicht mehr.

Einziger Unterschied zwischen dem Glauben an den Weihnachtsmann und dem Glauben an die Reaktoren in AutoCAD: Der Weihnachtsmann ist nicht so ein unappetitliches Thema.

Gruß, Axel Strube-Zettler

Code:

(defun add-reactors( / )
  (vlr-dwg-reactor nil '(
                          (:vlr-beginClose . beginCloseCallback)
                          (:vlr-beginDwgOpen . beginOpenCallback)
                          (:vlr-endDwgOpen . endOpenCallback)
                          (:vlr-beginSave . beginSaveCallback)
                          (:vlr-saveComplete . saveCompleteCallback)
                        )
  )
)

(defun beginCloseCallback(ro args / )
  (princ"\n=====>Aktuelle Zeichnung wird geschlossen")
  (princ "\nTaste drücken\n")
  (read-char)
  (princ)
)


(defun beginOpenCallback(ro args / )
  (princ(strcat "\n=====>Zeichnung " (car args) " soll geöffnet werden"))
  (princ)
)

(defun endOpenCallback(ro args / )
  (princ(strcat "\n=====>Zeichnung " (car args) " wurde geöffnet"))
  (princ)
)

(defun beginSaveCallback(ro args / )
  ;(princ(strcat "\n=====>Aktuelle Zeichnung soll als " (car args) " gespeichert werden"))
  (princ(type(car args)))  (terpri)
  (princ)
)

(defun saveCompleteCallback(ro args / )
  ;(princ(strcat "\n=====>Aktuelle Zeichnung wurde als " (car args) " gespeichert"))
  (princ(type(car args))) (terpri)

  (princ "\nTaste drücken\n")
  (read-char)
  (princ)
)

; one shot by load
(add-reactors)


------------------
(defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man's hat
Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze

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



Technischer Zeichner / Technischer Systemplaner (w/m/d) Schwerpunkt Revit

Die RBS wave GmbH ist eines der großen Ingenieurunternehmen in Baden-Württemberg. Mehr als 170 Mitarbeitende arbeiten in den Geschäftsfeldern Energie, Wasser und Infrastruktur. Das Dienstleistungsangebot der RBS wave GmbH richtet sich vorwiegend an Versorger, Stadtwerke, Kommunen und Wasserzweckverbände in Baden-Württemberg sowie den angrenzenden Regionen. Die RBS wave GmbH ist ein Unternehmen der EnBW Energie Baden-Württemberg AG....

Anzeige ansehenTechnischer Zeichner, Bauzeichner
tmoehlenhoff
Ehrenmitglied V.I.P. h.c.
Gutzum, CAD-Therapeut und BIM-Priester ;-)



Sehen Sie sich das Profil von tmoehlenhoff an!   Senden Sie eine Private Message an tmoehlenhoff  Schreiben Sie einen Gästebucheintrag für tmoehlenhoff

Beiträge: 2996
Registriert: 14.10.2002

ATD 2 bis 2007

erstellt am: 18. Dez. 2004 16:36    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hi Axel,

danke für die Infos, das deckt sich soweit auch mit den Erkenntnissen aus meiner Rumspielerei. Dann brauch ich jetzt wenigstens nicht weiter rumprobieren.
Möglicherweise gab's beim :VLR-endDwgOpen mal ne Kernschmelze, wer weiss ...

sayonara
Torsten Möhlenhoff
ACAD-Systemhaus Bremen

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz