| |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
 | Von Digital Twins bis Hochleistungs-Computing: PNY präsentiert seine Zukunftstechnologien für die Industrie von morgen, eine Pressemitteilung
|
Autor
|
Thema: Profile über Icon aufrufen (1450 mal gelesen)
|
REl Mitglied Maschienenbautechniker
 
 Beiträge: 349 Registriert: 25.07.2012 WIN 7 Prof. 64bit SP1 Intel Xeon W3530 24GB Ram NVIDEA Quadro 2000
|
erstellt am: 11. Feb. 2014 15:46 <-- editieren / zitieren --> Unities abgeben:         
Hi, wir haben 3 verschiedene Profile für ACAd. Was muss ich machen damit ich mithilfe von 3 Icons auf dem Destop jeweils ein Profil aufruffen?? DANKE im Vorraus!!! ------------------ wer nichst weis der mus nichts tuhn Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Guenther P Mitglied Techniker
   
 Beiträge: 1134 Registriert: 14.05.2010
|
erstellt am: 11. Feb. 2014 15:53 <-- editieren / zitieren --> Unities abgeben:          Nur für REl
/p"profilname" schau mal bei deinem Icon nach, kopiere es und ersetzte jeweils die Profilnamen ------------------ - gü - ...then it comes to be that the soothing light at the end of your tunnel was just a freight train coming your way... (James Hetfield) [Diese Nachricht wurde von Guenther P am 12. Feb. 2014 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
..... Mitglied
 
 Beiträge: 433 Registriert: 01.07.2011
|
erstellt am: 11. Feb. 2014 15:53 <-- editieren / zitieren --> Unities abgeben:          Nur für REl
|
cadffm Moderator 良い精神
       

 Beiträge: 22595 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 11. Feb. 2014 16:13 <-- editieren / zitieren --> Unities abgeben:          Nur für REl
Wenn es mal innerhalb ACADs sein soll: Code:
;; Profil setzen (defun setProfile (PNAME / aProfiles) (vl-load-com) (setq aProfiles (vla-get-Profiles(vla-get-Preferences (vlax-get-acad-object)))) (cond ((= (strcase(getvar "cProfile")) (strcase PNAME)) (princ (strcat "\n'" PNAME "' ist bereits das aktuelle Profil"))) ((not(vl-catch-all-error-p (vl-catch-all-apply 'vla-item (list aProfiles PNAME)))) (princ (strcat "\nProfil '" PNAME "' ist nicht vorhanden"))) (T (if (vl-catch-all-error-p (vl-catch-all-apply 'vla-put-ActiveProfile (list aProfiles PNAME))) (princ (strcat "\n'" PNAME "' wurde nicht aktuell gesetzt, es ist ein Fehler aufgetreten")) (princ (strcat "\n'" PNAME "' wurde aktuell gesetzt")))) );_cond ) ;_defunBeispiel AutoCADbefehle: (defun c:spTEST1 nil ; setzen eines festgelegten Profile (setProfile "test1") ) (defun c:spTEST2 nil ; setzen eines festgelegten Profile (setProfile "test2") ) (defun c:spTEST3 nil ; wechsel zwischen 2 festgelegten Profilen (setProfile (if (= "TEST1" (strcase(getvar "cProfile")))"TEST2" "TEST1")) )
------------------ CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
REl Mitglied Maschienenbautechniker
 
 Beiträge: 349 Registriert: 25.07.2012 WIN 7 Prof. 64bit SP1 Intel Xeon W3530 24GB Ram NVIDEA Quadro 2000
|
erstellt am: 11. Feb. 2014 17:44 <-- editieren / zitieren --> Unities abgeben:         
|
CADmium Moderator Maschinenbaukonstrukteur
       

 Beiträge: 13533 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 12. Feb. 2014 07:44 <-- editieren / zitieren --> Unities abgeben:          Nur für REl
|
cadffm Moderator 良い精神
       

 Beiträge: 22595 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 12. Feb. 2014 08:13 <-- editieren / zitieren --> Unities abgeben:          Nur für REl
Zitat: Original erstellt von CADmium: @cadffm .. hättest du mal die Suche bemüht .
Brauche ich nicht, ich weiss was das es alles im Netz gibt und die Sache auf CAD.de sind mir erst recht bekannt  Ich kann euch nicht genug danken für hunderte Codebeispiele, danke danke danke. Das Finden ging also ebenso schnell offline wie online, nur die Beispiele sind imo für den User noch zusärtlich interessant ------------------ CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
       

 Beiträge: 13533 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 12. Feb. 2014 08:48 <-- editieren / zitieren --> Unities abgeben:          Nur für REl
|
cadffm Moderator 良い精神
       

 Beiträge: 22595 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 12. Feb. 2014 08:54 <-- editieren / zitieren --> Unities abgeben:          Nur für REl
|