| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Neues Menü mit VBA in CUI abspreichern (1600 mal gelesen)
|
Goofy007 Mitglied Vermessungstechniker
Beiträge: 578 Registriert: 06.11.2004 Map3D 2018 und Civil3D 2018
|
erstellt am: 06. Jul. 2010 10:47 <-- editieren / zitieren --> Unities abgeben:
Hallo Forum, ich möchte ein neues Menü mittels VBA erzeugen. ADesk biete netterweise auch gleich ein Sample dazu an. Folgender CODE erzeugt neue Menüeinträge:
Code: Public Sub addMenuItem() 'creates a new submenu on the Modify menu called "Mymodify" Dim oAcad As AcadApplication Set oAcad = ThisDrawing.Application Dim oPopup As AcadPopupMenu Dim oSubPopup As AcadPopupMenu Dim oPopupMenuItem As AcadPopupMenuItem For Each oPopup In oAcad.MenuBar 'TagString is not localized so use it to locate the menu If oPopup.TagString = "ID_MnModify" Then Set oSubPopup = oPopup.AddSubMenu(0, "MyModify") 'set TagString to a known value; we'll use this during removal oSubPopup.Parent.TagString = "ID_MyModify" Set oPopupMenuItem = oSubPopup.addMenuItem(0, "MenuItem1", "command1 ") oPopupMenuItem.HelpString = "This is the helpstring for command1" Set oPopupMenuItem = oSubPopup.addMenuItem(1, "MenuItem2", "command2 ") oPopupMenuItem.HelpString = "This is the helpstring for command2" Set oPopupMenuItem = oSubPopup.addMenuItem(2, "MenuItem3", "command3 ") oPopupMenuItem.HelpString = "This is the helpstring for command3" oPopupMenuItem.Check = True Exit For End If Next oPopup End Sub
ABER: ich kann diese Menüs nicht in der CUI abspeichern oder bearbeiten, die werden mir da gar nicht gezeigt. Und nach dem nächsten Neustart von Acad sind die wieder weg. FRAGE: Wie kann ich Menüs (und Werkzeugekästen) dauerhaft mittels Programmierung anlegen? lg Didi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 ACAD 2008 Mechanical
|
erstellt am: 06. Jul. 2010 11:00 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
|
Goofy007 Mitglied Vermessungstechniker
Beiträge: 578 Registriert: 06.11.2004 Map3D 2018 und Civil3D 2018
|
erstellt am: 06. Jul. 2010 11:30 <-- editieren / zitieren --> Unities abgeben:
Hallo Thomas, ich hab das mal getestet. Es ist so wie du vermutet hast. Nach dem Erzeugen der neuen Menüeinträge kann ich den Arbeitsbereich wechseln, und die neuen Einträge bleiben erhalten. Aber wenn ich das Profil wechsle sind die neuen Einträge weg. In die xml-Dateien möchte ich eigentlich auch nicht schreiben. Da steht ja auch, daß man das nicht soll. Kann man das bei den neuen CUIx überhaupt noch? Die sind doch auch schon binär, oder? Da ich sehr viele Menüeinträge schreiben muss, werd ich mal schauen, ob ich das als mnu (mns) schreiben und importieren kann. Was hältst du von der Idee? lg Didi
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Ehrenmitglied V.I.P. h.c. 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 06. Jul. 2010 11:32 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
|
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 ACAD 2008 Mechanical
|
erstellt am: 06. Jul. 2010 11:33 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
|
Goofy007 Mitglied Vermessungstechniker
Beiträge: 578 Registriert: 06.11.2004 Map3D 2018 und Civil3D 2018
|
erstellt am: 06. Jul. 2010 11:39 <-- editieren / zitieren --> Unities abgeben:
|
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 ACAD 2008 Mechanical
|
erstellt am: 06. Jul. 2010 11:43 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
|
cadffm Ehrenmitglied V.I.P. h.c. 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 06. Jul. 2010 12:06 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
Ja, zum speien - deswegen: 100%ig nicht praktikabel, stimmt schon. Ich wollte ja nur auf das "ist doch binär" eingehen mit meiner Antwort. MNU: Bis vor einem Jahr habe ich mein Menü auch noch als MNU gepflegt, aber das ging mir dann auch langsam auf den Zeiger. Mal ne Frage in die Runde - Gibt es von Adesk irgendwo, sei es auch noch so wenig, eine kleine Doku die etwas tiefer geht bezüglich der neun CuiX Menügeschichte ? Icons werden automatisch einverleibt, cuix ist eigentlich Zip usw. - gibt es da was oder freut sich der Poweruser an dieser Stelle infach darüber etwas mehr zu wissen wie der Rest der AdeskUserWelt ? Ich denke das ich nach einführung der Cui´s nie mehr irgend eine gescheite Doku darüber gefunden habe, eigentlich fängt es schon mit den WerkzeugPaletten an, auch hierüber sind mir spontan nur "Anwender-Infos" bekannt. Was ein Glück gibt es viele Anwender weltweit und das Internetz, ein hoch auf darauf meinerseits. ------------------ CAD.de System-Angaben - CAD on demand - User:FAQ(Acad) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bge Mitglied CAD-Administrator
Beiträge: 42 Registriert: 23.09.2008 ADT 2007, Mechanical 2009, Inventor 2009, GAIN-System, VBA, VB.NET, AutoLisp
|
erstellt am: 06. Jul. 2010 12:52 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
Hallo, ich hatte auch mal ein ähnliches Problem. VBA stellt einfach nicht genügende Objekte für die CUI zur Verfügung. Gelöst habe ich das Problem dann dadurch, dass ich dann über VB.NET programmiert habe. Hier gibt es alle benötigten Objekte zur CUI. Gürße Bernd ------------------ Bernd Gerstenberger Dipl.-Geogr., MCSE, AutoCAD 2010 Certified Professional, CAD-Administrator Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Goofy007 Mitglied Vermessungstechniker
Beiträge: 578 Registriert: 06.11.2004 Map3D 2018 und Civil3D 2018
|
erstellt am: 07. Jul. 2010 07:46 <-- editieren / zitieren --> Unities abgeben:
Hallo Bernd, das ist eine interessante Idee, daran hab ich auch schon gedacht. Aber ich bin immer noch auf der Suche nach deutschsprachinger Lektüre zum Thema Autocad programmieren mit VB.NET (VB 2008 Express). Gibt es da inzwischen was? lg Didi
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bge Mitglied CAD-Administrator
Beiträge: 42 Registriert: 23.09.2008 ADT 2007, Mechanical 2009, Inventor 2009, GAIN-System, VBA, VB.NET, AutoLisp
|
erstellt am: 15. Jul. 2010 11:41 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
Hallo Didi, deutschsprachig habe ich bisher nichts gefunden. Aber VB.NET for AutoCAD von Jerry Winter ist wirklich zu empfehlen. Trotz Englisch ist es sehr gut zu verstehen. Meine Empfehlung hat es. Grüße Bernd ------------------ Bernd Gerstenberger Dipl.-Geogr., MCSE, AutoCAD 2010 Certified Professional, CAD-Administrator Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Goofy007 Mitglied Vermessungstechniker
Beiträge: 578 Registriert: 06.11.2004 Map3D 2018 und Civil3D 2018
|
erstellt am: 15. Jul. 2010 15:56 <-- editieren / zitieren --> Unities abgeben:
|
GeorgK Mitglied
Beiträge: 619 Registriert: 06.06.2001
|
erstellt am: 25. Jul. 2010 11:12 <-- editieren / zitieren --> Unities abgeben: Nur für Goofy007
|