---

Guten Morgen an alle,

ich versuche gerade mit Hilfe des Recorders mir einige arbeitserleichternde Macros zu generieren. Unter anderem möchte ich die Beschriftung ausblenden (zu Fuß: rechte Maustaste im Featurebaum auf "Beschriftung", und das Häckchen bei "Beschriftung anzeigen" wegklicken). Wenn ich diese Befehlsfolge aufzeichne, so liefert das folgende Zeile:
boolstatus = Part.Extension.SelectByID("Beschriftung", "DCABINET", 0, 0, 0, False, 0, Nothing)
Diese Zeile füge ich am Ende eines anderes Macro ein und lasse es dann ablaufen - aber es passiert nichts!
D.h. das Macro läuft einwandfei und macht auch alles was ich will, bis auf die letzte Zeile, d.h., die Beschriftung ist nach wie vor eingeblendet.
Habe ich da irgendwo einen Denkfehler reingebracht?

Vielen Dank schon mal im Voraus 

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

---

Hallo "gasradl",

es tut mir leid Dich enttäuschen zu müssen, aber das was Du mahcen wolltest geht leider nicht. Es gibt keinen API-Befehl, um die Beschriftung ein-/auszuschalten. Die übermittelte Befehlszeile dient lediglich (wie der Name schon andeutet) ein Objekt (hier im Featurebaum) anzuwählen. Also dasselbe wie einKlicken mit der linken Maus im FM auf das BeschreiftungsIcon. Deshalb passiert auch weiter nichts.

Gruß VK

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

---

Hallo Volker,

ich kenn' mich leider mit API/VB (noch) zu wenig aus, aber Deine Antwort leuchtet mir schon ein.
Allerdings, warum funktionieren dann die beiden anderen "Befehle", die ich auf dieselbe Art und Weise aufgezeichnet habe (Ebenen und Ursprung ausblenden). Hier die Zeilen, die das veranlassen:

boolstatus = Part.Extension.SelectByID("YZ-Ebene", "PLANE", 0, 0, 0, False, 0, Nothing)
Part.BlankRefGeom
boolstatus = Part.Extension.SelectByID("Punkt1@Ursprung", "EXTSKETCHPOINT", 0, 0, 0, False, 0, Nothing)
Part.BlankSketch

Was ich bis jetzt noch nicht rausgefunden habe: was bedeuten die beiden Zeilen mit "Part.BlankRefGeom" bei den Ebenen und "Part.BlankSketch" beim Ursprung?

Muß sowas ähnliches vielleicht auch bei der Beschriftung angefügt werden?

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

---

Hallo "gasradl"

Das geht so :

res = Part.SetUserPreferenceToggle(31, false)

Damit schaltet man die Texte auf der Zeichnung unsichtbar. Wird als Parameter TRUE eingegeben, ist der Text wieder sichtbar.

Die Makrofunktion zeichnet leider nur die Mausbewegungen und die Tastaturfunktionen auf. In deinem Fall ist das Auswählen im Featurebaum der Beschriftung aufgezeichnet worden. Hier nicht zu gebauchen.

Bis dann

Manfred Kern

CAD-Office.Kern

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

---

Dass stimmt. Das Problem ist nur, daß es aus welchen Gründen auch immer keinen Befehl "modeldoc2.BlankText" bzw. modeldoc2.UnBlankText" gibt.

ModelDoc2::UnBlankRefGeom  schaltet eine zuvor selektierte Refernzgeometrie sichtbar

ModelDoc2::BlankRefGeom  umgekehrt unsichtbar

Leider gibt es nicht für alle interaktiven Solidworks-Befehle ein entsprechendes API-Analogon.

Etwa 80% der Befehle sind schätzungsweise abgedeckt und davon wiederum 80-85% über VB greifbar.

Das wäre was für eine "Enhancement Request".
Ich wollte auch für meine praktische Arbeit, daß es besser wäre.

Gruß VK

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

---

Hallo Manfred,

Super, vielen Dank, hat funktioniert!
Ich hoffe, ich hab' irgendwann mal Zeit mich etwas mehr mit der API zu beschäftigen.

[Diese Nachricht wurde von gasradl am 05. März 2003 editiert.]

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

---

Mein Name ist NICHT Volker !!

Tschüss.

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

---

Jo, sorry, hab' selber grad gemerkt und schon geändert

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