Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Inventor VBA
  Auto-Kantenprojektion in Skizze an/ab-schalten

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Auto-Kantenprojektion in Skizze an/ab-schalten (1551 mal gelesen)
Doc Snyder
Ehrenmitglied V.I.P. h.c.
Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen



Sehen Sie sich das Profil von Doc Snyder an!   Senden Sie eine Private Message an Roland Schröder  Schreiben Sie einen Gästebucheintrag für Roland Schröder

Beiträge: 13115
Registriert: 02.04.2004

AIP2013SP2.2 XPproSP2 MS-IntelliMouse-Optical SpacePilot
DellM4600 2,13GHz 2GB FxGo1400 1920x1200
am Dock Dell2711

erstellt am: 28. Mrz. 2007 13:50    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Moin!

Es geht hier um das dritte Häkchen in dem vorletzten Abschnitt auf der Seite Skizze der Applikation-Options, das macht, dass beim Öffnen einer Skizze automatisch alle begrenzenden Kanten projiziert werden. Normal ist das die reinste Seuche, deshalb habe ich es meistens aus, aber bei bestimmten Blechoperationen ist es doch nützlich und da muss ich es dann häufig an und ausschalten. Ein Icon dazu wäre schön; Frage also:
Kann man darauf mit VBA zugreifen?
Wenn ja, wisst Ihr das Zauberwort dazu?

Gruß aus dem sonnigen Salzburg!

------------------
Roland  
www.Das-Entwicklungsbuero.de

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

SEHER
Mitglied
Systemanalytiker


Sehen Sie sich das Profil von SEHER an!   Senden Sie eine Private Message an SEHER  Schreiben Sie einen Gästebucheintrag für SEHER

Beiträge: 1203
Registriert: 13.03.2001

erstellt am: 28. Mrz. 2007 14:35    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Doc Snyder 10 Unities + Antwort hilfreich

Hallo Roland,

erstmal Grüße nach Salzburg und vielleicht hilft Dir das weiter.


Autodesk Inventor Object Library
AutoProjectEdges PropertyDescription
Read-write Boolean property that enables or disables the capability to select and project existing geometry to the current sketch by "rubbing" the existing lines. The lines are projected as reference geometry. Setting this property to True enabled Autoproject.

Property type
Read-write property

Syntax (Visual Basic)

Public Property AutoProjectEdges() As Boolean


------------------
Gruß
SEHER
www.inventor-tools.de

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

daywa1k3r
Moderator
Softwareentwickler




Sehen Sie sich das Profil von daywa1k3r an!   Senden Sie eine Private Message an daywa1k3r  Schreiben Sie einen Gästebucheintrag für daywa1k3r

Beiträge: 3497
Registriert: 01.08.2002

Alienware m17x, Win7, Inventor2012

erstellt am: 28. Mrz. 2007 15:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Doc Snyder 10 Unities + Antwort hilfreich

Dem zu Folge lautet die „Funktion“:

Code:

Public Sub ToggleAutoProjectEdges()
    ThisApplication.SketchOptions.AutoProjectEdges = Not ThisApplication.SketchOptions.AutoProjectEdges
End Sub

@Andreas
Auch in Salzburg?


------------------
Grüße Igor

FX64 Software Solutions
HMI ~ 16.-20. April 2007 ~ CAD.de Halle 17, Stand F60

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

SEHER
Mitglied
Systemanalytiker


Sehen Sie sich das Profil von SEHER an!   Senden Sie eine Private Message an SEHER  Schreiben Sie einen Gästebucheintrag für SEHER

Beiträge: 1203
Registriert: 13.03.2001

erstellt am: 28. Mrz. 2007 15:17    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Doc Snyder 10 Unities + Antwort hilfreich

Hallo Igor,

nee ich hab ja auch geschrieben "Grüße nach Salzburg". Werde 2008er Autorisierung erst Ende April machen.

------------------
Gruß
SEHER
www.inventor-tools.de

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

daywa1k3r
Moderator
Softwareentwickler




Sehen Sie sich das Profil von daywa1k3r an!   Senden Sie eine Private Message an daywa1k3r  Schreiben Sie einen Gästebucheintrag für daywa1k3r

Beiträge: 3497
Registriert: 01.08.2002

Alienware m17x, Win7, Inventor2012

erstellt am: 28. Mrz. 2007 15:21    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Doc Snyder 10 Unities + Antwort hilfreich

Also, diesmal nichts mit Dance Contest  Egal, bin diesmal auch nicht dort.

------------------
Grüße Igor

FX64 Software Solutions
HMI ~ 16.-20. April 2007 ~ CAD.de Halle 17, Stand F60

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

Doc Snyder
Ehrenmitglied V.I.P. h.c.
Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen



Sehen Sie sich das Profil von Doc Snyder an!   Senden Sie eine Private Message an Roland Schröder  Schreiben Sie einen Gästebucheintrag für Roland Schröder

Beiträge: 13115
Registriert: 02.04.2004

AIP2013SP2.2 XPproSP2 MS-IntelliMouse-Optical SpacePilot
DellM4600 2,13GHz 2GB FxGo1400 1920x1200
am Dock Dell2711

erstellt am: 28. Mrz. 2007 16:26    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo zusammen!

Ich hatte das tatsächlich schon allein aus altem Code weiterentwickelt und ans Laufen gebracht und bin sehr stolz auf Euch, dass Ihr mich so weit gebracht habt!

Wichtig noch: Die oben genannte Variable ist nicht die, die ich meinte, sie greift auf das zweite Häkchen zu, ich aber meine das dritte, und darauf greift: oApp.SketchOptions.AutomaticReferenceEdges

Wenn ich den Code vom Editor aus starte, macht er damit schon, was er soll. Ein Icon dazu habe ich auch schon malen und in die Schaltleite einfügen können. Jetzt habe ich aber noch das Problem, dass die Verbindung zum Code noch nicht geht, weder vom Icon, noch über den dazu bereits vereinbarten Shortcut.

Woran kann das noch liegen?

Muss da noch mehr als nur der Name stimmen?

Und dann hätte ich noch dem Wunsch (bei dieser Funktion besonders!), und zwar das Icon korrespondierend so zu verändern, dass man daran den Zustand des Häkchens erkennt.

------------------
Roland  
www.Das-Entwicklungsbuero.de

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

daywa1k3r
Moderator
Softwareentwickler




Sehen Sie sich das Profil von daywa1k3r an!   Senden Sie eine Private Message an daywa1k3r  Schreiben Sie einen Gästebucheintrag für daywa1k3r

Beiträge: 3497
Registriert: 01.08.2002

Alienware m17x, Win7, Inventor2012

erstellt am: 28. Mrz. 2007 16:36    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Doc Snyder 10 Unities + Antwort hilfreich

Checkliste:

Ist die Funktion Public?

Extras -> Anpassen -> Befehle -> Makros. Erscheint die Funktion in dem rechten Fenster?

Funktioniert der Befehl nach dem er auf  die Werkzeugleiste „gedroppt“ wurde?

Das mit Icon wechseln wird wohl mit VBA Makros nicht funktionieren.

------------------
Grüße Igor

FX64 Software Solutions
HMI ~ 16.-20. April 2007 ~ CAD.de Halle 17, Stand F60

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

Doc Snyder
Ehrenmitglied V.I.P. h.c.
Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen



Sehen Sie sich das Profil von Doc Snyder an!   Senden Sie eine Private Message an Roland Schröder  Schreiben Sie einen Gästebucheintrag für Roland Schröder

Beiträge: 13115
Registriert: 02.04.2004

AIP2013SP2.2 XPproSP2 MS-IntelliMouse-Optical SpacePilot
DellM4600 2,13GHz 2GB FxGo1400 1920x1200
am Dock Dell2711

erstellt am: 28. Mrz. 2007 17:00    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ja, ist "Public Sub", ist ja von anderen Funktionen abgeschrieben, die funktionieren.

Das Icon konnte ich ja nur platzieren, weil es in der Liste auftauchte, ist ja auch schon da, und funktioniert NICHT.

Gibt es sonst eine Möglichkeit, den Zustand dieser Variablen in IV anzuzeigen? Evtl. eine (nur kurz erscheinende) Meldung?

------------------
Roland  
www.Das-Entwicklungsbuero.de

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

Doc Snyder
Ehrenmitglied V.I.P. h.c.
Dr.-Ing. Maschinenbau, Entwicklung & Konstruktion von Spezialmaschinen



Sehen Sie sich das Profil von Doc Snyder an!   Senden Sie eine Private Message an Roland Schröder  Schreiben Sie einen Gästebucheintrag für Roland Schröder

Beiträge: 13115
Registriert: 02.04.2004

AIP2013SP2.2 XPproSP2 MS-IntelliMouse-Optical SpacePilot
DellM4600 2,13GHz 2GB FxGo1400 1920x1200
am Dock Dell2711

erstellt am: 28. Mrz. 2007 17:24    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Zitat:
Original erstellt von Doc Snyder:
Ja, ist "Public Sub", ist ja von anderen Funktionen abgeschrieben, die funktionieren.
Blödsinn! Da steht tatsächlich "Private Sub", wie bei den anderen Funktionen in demselben Modul auch, aber die funktionieren damit.

------------------
Roland  
www.Das-Entwicklungsbuero.de

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

daywa1k3r
Moderator
Softwareentwickler




Sehen Sie sich das Profil von daywa1k3r an!   Senden Sie eine Private Message an daywa1k3r  Schreiben Sie einen Gästebucheintrag für daywa1k3r

Beiträge: 3497
Registriert: 01.08.2002

Alienware m17x, Win7, Inventor2012

erstellt am: 28. Mrz. 2007 19:15    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Doc Snyder 10 Unities + Antwort hilfreich

Also bei mir funktionieren nur die Publics  Bist du dir das sicher, das deine Private Funktionen aufgerufen werden können?

Also noch mal. Du hast die Funktion in dein Modul geschrieben und getestet und es funktioniert. Das Modul befindet sich in Anwendungsprojekt. Über Extras-Anpassen-Befehle-Makros konntest du in dem rechten Fenster deine Funktion sehen (kein vertipper?). Den Befehl konntest du in eine Werkzeugleiste reinziehen, und nach dem Klick tut sich nichts?

Aber stimmt, dass ohne Anzeige so eine Funktion nicht so optimal ist, denn man sieht wirklich nicht, welcher Zustand momentan aktiv ist. Du kannst eine Zeile hinzufügen, die dir den Zustand in Statusbar anzeigt. Bei nächsten Befehl verschwindet die Meldung wieder, aber den Zweck erfüllt sie.

Code:

Public Sub ToggleAutomaticreferenceEdges()
    ThisApplication.SketchOptions.AutomaticReferenceEdges = Not ThisApplication.SketchOptions.AutomaticReferenceEdges
    ThisApplication.StatusBarText = "Begrenzenden Kanten automatisch projezieren = " & ThisApplication.SketchOptions.AutomaticReferenceEdges
End Sub

BTW. Natürlich, richtig heißt es Toggle 

Also, hier alles klar. Probier mal die auf Public zu setzen, wenn da oben alles klar ist.

------------------
Grüße Igor

FX64 Software Solutions
HMI ~ 16.-20. April 2007 ~ CAD.de Halle 17, Stand F60

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz