Reactor funktioniert nur halb (Autodesk/Lisp)

Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte

NVIDIA RTX PRO 6000 Blackwell Max-Q Workstation Edition, eine Pressemitteilung

Meldungen abonnieren

Autor

Thema: Reactor funktioniert nur halb (708 mal gelesen)

cadplayer
Ehrenmitglied
CADniker

Senden Sie eine Private Message an cadplayer

Schreiben Sie einen Gästebucheintrag für cadplayer

Beiträge: 1838
Registriert: 28.04.2009

Windows 10
64bit system
Autocad Civil3d 2020 ENGLISH
Visual Studio 2019
OpenDCL.Runtime.9<P>

erstellt am: 16. Aug. 2012 13:16

Editieren oder löschen Sie diesen Beitrag!

<-- editieren / zitieren -->

Unities abgeben:

Hallo!

Ich habe hier mal einen Reaktor zusammengefumelt, der mir alle gew. Obj. in der Macroleiste anzeigen soll. Mich wundert es nur warum die korrekte Anzeige kommt wenn die obj. wieder demarkiert sind ?

Code:
(defun c:modobj ()
(if *Object:Reactor*
(progn
(vlr-set-notification
(setq *Object:Reactor*
(vlr-miscellaneous-reactor
nil
'((:vlr-pickfirstmodified . Object:Reactor))
)
)
'Active-Document-Only
)
(setq *Object:ModeMacro* (getvar 'MODEMACRO))
(prompt "\nObject Reactor active!")
)
)
(princ)
)
(defun Object:Reactor (react param / )
(if (setq ss (ssget "_I" '((0 . "INSERT,ARC,CIRCLE,ELLIPSE,LINE,*POLYLINE,SPLINE"))))
(progn (setq i -1
obj nil
)

(while (setq e (ssname ss (setq i (1+ i))))
(setq obj (entget e))
obj
)
)
(setvar 'MODEMACRO
(setq objIndex
(strcat "[ ("
(itoa i)
") objects found ]"
)
)
)
)
)

------------------
Gruss Dirk

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

CADmium
Moderator
Maschinenbaukonstrukteur

Senden Sie eine Private Message an CADmium

Schreiben Sie einen Gästebucheintrag für CADmium

Beiträge: 13533
Registriert: 30.11.2003

erstellt am: 16. Aug. 2012 13:38

<-- editieren / zitieren -->

Unities abgeben:

Nur für cadplayer

Der Reaktor feuert wenn das Pickfirstselset geändert wird, also genau bevor Objekte dort eingetragen / oder entfernt werden ....

------------------
- 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

cadplayer
Ehrenmitglied
CADniker

Beiträge: 1838
Registriert: 28.04.2009

Windows 10
64bit system
Autocad Civil3d 2020 ENGLISH
Visual Studio 2019
OpenDCL.Runtime.9<P>

erstellt am: 17. Aug. 2012 10:24

<-- editieren / zitieren -->

Unities abgeben:

was meinst du genau Thomas

------------------
Gruss Dirk

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

CADmium
Moderator
Maschinenbaukonstrukteur

Beiträge: 13533
Registriert: 30.11.2003

erstellt am: 17. Aug. 2012 10:39

<-- editieren / zitieren -->

Unities abgeben:

Nur für cadplayer

.. der Reaktor funktioniert schon, du meinst bloß, er müßte dir die Änderungen anzeigen, das könnte er aber nur, wenn er nach dem Ändern gestartet werden würde. somit brauchst du für dein Anliegen??? einen anderen Konstrukt.

------------------
- 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

Anzeige:	Infos zum Werbeplatz >>
A>V>C> Solid Subtract CAD APP für Messestände, Holzarbeiten, Allgemeine Werkzeuge Subtraction, intersection, and union of solids. With or without a gap. Preserving material and face coloring. Preserving source objects and the subtrahend.

cadplayer
Ehrenmitglied
CADniker

Beiträge: 1838
Registriert: 28.04.2009

Windows 10
64bit system
Autocad Civil3d 2020 ENGLISH
Visual Studio 2019
OpenDCL.Runtime.9<P>

erstellt am: 17. Aug. 2012 10:54

<-- editieren / zitieren -->

Unities abgeben:

okay danke ich grübel mal weiter... brauche etwas Zeit dafür

------------------
Gruss Dirk

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

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)

A>V>C> Solid Subtract CAD APP für Messestände, Holzarbeiten, Allgemeine Werkzeuge