| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | AutoCAD Architecture Schulung mit IHK-Zertifizierung , ein Kurs (bis zu 100% förderbar mit Bildungsgutschein)
|
|
Autor
|
Thema: dynamischer block ? lisp prüfung (1369 mal gelesen)
|
tappenbeck
Mitglied
Vermessungsingenieur
   Beiträge: 1222
Registriert: 30.05.2002 AutoCAD (Map)2019, Topobase, MapEdit, Lisp, .vb.net
|
erstellt am: 26. Mrz. 2008 14:25  <-- editieren / zitieren -->   Unities abgeben:          
|
CADmium
Moderator
Maschinenbaukonstrukteur
    
Beiträge: 13533
Registriert: 30.11.2003 .
|
erstellt am: 26. Mrz. 2008 14:30 <-- editieren / zitieren --> Unities abgeben: Nur für tappenbeck 
jo, in dem man diese Eigenschaft via ActivX abfragt .... einfach mal in der Lisphilfe das Objectmodel angucken und sich durchhangeln ------------------
 - 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 |
tappenbeck
Mitglied
Vermessungsingenieur
Beiträge: 1222
Registriert: 30.05.2002 AutoCAD (Map)2019, Topobase, MapEdit, Lisp, .vb.net
|
erstellt am: 26. Mrz. 2008 15:30 <-- editieren / zitieren --> Unities abgeben:
hi ! vielen dank für den hinweis - wurde in der autocad discussion group fündig und habe etwas umgebaut. Code:
(defun IsDynamicBlock (IsDynamicBlock#Ename / )
(if (= (vla-get-IsDynamicBlock
(vlax-ename->vla-object IsDynamicBlock#Ename)
)
:vlax-true
)
T
nil
)
)
gruß Jan :-) ------------------
jan :-) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| |
wronzky
Ehrenmitglied V.I.P. h.c.
CAD-Dienstleistungen für Architekten
Beiträge: 2154
Registriert: 02.05.2005 CAD:
AutoCAD 2.6 bis 2014
ADT 2005 - 2014
Arcibem
System:
Windows 2000, XP, NO VISTA
Internet-Startseite:
http://www.archi.de
|
erstellt am: 26. Mrz. 2008 15:55 <-- editieren / zitieren --> Unities abgeben: Nur für tappenbeck
Hi Jan, das mit dem if kannste auch weglassen, da (= ..) ja sowieso T / NIL zurückgibt: Code:
(defun IsDynamicBlock (Ename /)
(=
(vla-get-IsDynamicBlock
(vlax-ename->vla-object Ename)
)
:vlax-true
)
)
Grüsse, Henning------------------
Henning Jesse
VoxelManufaktur
Computer-Dienstleistungen für Architekten und Ingenieure  http://www.voxelman.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
