| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Integration von 3D-Ersatzteilkatalogen in bestehende Systeme, ein Webinar am 24.10.2024
|
Autor
|
Thema: Abfrage Autodesk product (1080 mal gelesen)
|
cadplayer Ehrenmitglied CADniker
Beiträge: 1833 Registriert: 28.04.2009
|
erstellt am: 30. Jun. 2016 12:08 <-- editieren / zitieren --> Unities abgeben:
Kennt jemand eine System- oder Envoirement-Variable die Aufschluss darüber gibt ob Autocad oder Civil3d aktuell läuft. Die 'ACADVER hilft mir nicht weiter, da sie mir in beiden Systmen den Wert 20 zurückgibt (ACADVER = "20.1s (LMS Tech)" (read only) ) HG ist der, dass ich Eigenentwicklungen in Civil3d nicht in Autocad verwenden darf/kann. Rein theoretisch kann ich sie aber in Autocad laden (die Befehle sind dann auch in Autocad erreichbar) ------------------ Gruss Dirk Blog | Adolf Spende | Infra-Feed | ÅF AB
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
RL13 Ehrenmitglied V.I.P. h.c. Dipl.-Ing. Bauwesen
Beiträge: 2373 Registriert: 23.10.2008 Civil 3D 2018.1 Civil 3D 2016 64 Bit SP 3 mit DACH und Extensions W7 Professional 64Bit HP Z440 Intel Xeon CPU E5-1620 v4 32 GB RAM NVIDIA Quadro P4000
|
erstellt am: 30. Jun. 2016 12:14 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
|
cadplayer Ehrenmitglied CADniker
Beiträge: 1833 Registriert: 28.04.2009
|
erstellt am: 01. Jul. 2016 09:14 <-- editieren / zitieren --> Unities abgeben:
|
runkelruebe Moderator Straßen- / Tiefbau
Beiträge: 8086 Registriert: 09.03.2006 Kinder, kauft Kämme! Es kommen lausige Zeiten.
|
erstellt am: 01. Jul. 2016 10:02 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
(vla-get-caption (vlax-get-acad-object)) reicht Dir nicht? Dann bliebe noch die Abfrage, ob bestimmte arx/dll geladen sind, ob spezifische Befehle aktiv sind etc. Sei kreativ (auch beim googeln ) ------------------ Gruß, runkelruebe Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadplayer Ehrenmitglied CADniker
Beiträge: 1833 Registriert: 28.04.2009
|
erstellt am: 05. Jul. 2016 08:24 <-- editieren / zitieren --> Unities abgeben:
|
StephanJP Mitglied CAD-Admin
Beiträge: 834 Registriert: 09.11.2000 AutoCAD ,MAP 3D, Civil 3D, Recap Pro, InfraWorks, VehicleTracking alles bis 2024, BBSoft, Win 10 Enterprise, Canon PlotClient Canon TX2000, TX3000
|
erstellt am: 05. Jul. 2016 09:32 <-- editieren / zitieren --> Unities abgeben: Nur für cadplayer
...vielleicht noch Code: (getvar "CPROFILE")
gibt das aktiv geladene Autocad-Profil zurück. Kann auf das Produkt verweisen, muss (wenn vom Benutzer geändert) natürlich nicht. ------------------ gruß Stephan Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadplayer Ehrenmitglied CADniker
Beiträge: 1833 Registriert: 28.04.2009
|
erstellt am: 05. Jul. 2016 09:53 <-- editieren / zitieren --> Unities abgeben:
Vielen euch allen. So könnte es funktionieren: Code:
; Variante 1 (defun LinfoProfile( / acad acadprefs acadprofiles actprofile) (setq acad (vlax-get-Acad-Object)) (setq acadprefs (vla-get-preferences acad)) (setq acadprofiles (vla-get-profiles acadprefs)) (setq actprofile (vla-get-ActiveProfile acadprofiles)) (vlax-invoke-method acadProfiles 'GetAllProfileNames 'thelist) ;;; (setq result (vlax-safearray->list thelist)) (setq result (getvar 'CPROFILE)) (if (vl-string-search "C3D" (strcase (vl-princ-to-string result))) (princ "\nCivil3d active") (princ "\nAutocad active") ) (princ (strcat "\nCurrent profile: < " actprofile " > ")) (princ) ) ; Variante 2 (defun Linfo2 ( / KeyLst RegPth RetVal) (setq RegPth (strcat "HKEY_LOCAL_MACHINE\\" (vlax-product-key)) KeyLst (vl-registry-descendents RegPth T) ) (foreach memb KeyLst (if (not (eq memb "")) (setq RetVal (cons (cons memb (vl-registry-read RegPth memb)) RetVal ) ) ) ) (reverse RetVal) ) (setq test1 (LinfoProfile)) (setq test2 (assoc "ProductName" (Linfo2)))
Wobei variable test2 auf alle Einträge in der registry zu Autocad installationen schaut. Sofern kann hier auch kein Unterschied festgestellt werden ob aktuell Autocad oder Civil3d läuft Riskant ist auch, wenn dummerweise Standardprofile gelöscht oder umbenannt wurden ------------------ Gruss Dirk Blog | Adolf Spende | Infra-Feed | ÅF AB
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |