Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  SolidWorks
  Anzeigeart bei API schattiert mit Kanten

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 SOLIDWORKS
  
Beyond SOLIDWORKS - Wie Dassault Systèmes Ihre Business-Hürden aus dem Weg räumt
Autor Thema:  Anzeigeart bei API schattiert mit Kanten (440 mal gelesen)
BranscheidGmbh
Mitglied
Dipl. Ing.


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

Beiträge: 49
Registriert: 15.01.2016

Solidworks Professional 2023 SP 5

erstellt am: 09. Dez. 2021 16:59    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

Guten Abend zusammen,

am Ende eines Makros möchte ich sicherstellen,
dass das geöffnete Teil
als "schattiert mit Kanten" dargestellt wird.

Der Makrorecorder und die Hilfe konnten mir leider nicht weiter helfen.

Vielleicht kennt ja einer von euch den passenden Befehl ?
DANKE !

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

Torsten Niemeier
Ehrenmitglied V.I.P. h.c.
Maschinenbau Ingenieur



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

Beiträge: 3682
Registriert: 21.06.2001

"ZUSE I.36", 8 BIT, 32 Lämpchen, Service-Ölkännchen "ESSO-Super", Software: AO auf Kuhlmann-Parallelogramm-Plattform
** CSWP 04/2011 **
** CSWE 08/2011 **

erstellt am: 09. Dez. 2021 17:30    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 BranscheidGmbh 10 Unities + Antwort hilfreich

Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
Dim activeModelView As Object
Set activeModelView = Part.ActiveView
activeModelView.DisplayMode = swViewDisplayMode_e.swViewDisplayMode_ShadedWithEdges
End Sub

[Diese Nachricht wurde von Torsten Niemeier am 09. Dez. 2021 editiert.]

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

BranscheidGmbh
Mitglied
Dipl. Ing.


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

Beiträge: 49
Registriert: 15.01.2016

Solidworks Professional 2023 SP 5

erstellt am: 10. Dez. 2021 09:01    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

Hatte mich schon gefreut, doch beim Ausführen des Makros sagte der Debugger, dass ihm die letzte Zeile "nicht gefällt".

activeModelView.DisplayMode = swViewDisplayMode_e.swViewDisplayMode_ShadedWithEdges

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

Carsten1210
Mitglied
staatl. geprüfter Holztechniker


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

Beiträge: 1358
Registriert: 24.07.2002

AutoCAD ACA 2019
Solidworks 2021 Sp5.1
Enterprise PDM 2021 Sp5
Pascam Woodworks
Visual Studio 2017 Pro
Windows 10 64Bit
Dell T3620
Intel Core i7-7700K
16 GB Arbeitsspeicher
2x Dell Ultrasharp U2415
Dell M4800

erstellt am: 10. Dez. 2021 09:22    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 BranscheidGmbh 10 Unities + Antwort hilfreich

Hi,

Dir fehlt wahrscheinlich der Verweis auf die "Solidworks 20xx Constant type library":
Die findest du im Instalaationpfad: "C:\Program Files\SolidWorks Corp20XX\SOLIDWORKS\swconst.tlb".

Gruss, Carsten

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

Torsten Niemeier
Ehrenmitglied V.I.P. h.c.
Maschinenbau Ingenieur



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

Beiträge: 3682
Registriert: 21.06.2001

"ZUSE I.36", 8 BIT, 32 Lämpchen, Service-Ölkännchen "ESSO-Super", Software: AO auf Kuhlmann-Parallelogramm-Plattform
** CSWP 04/2011 **
** CSWE 08/2011 **

erstellt am: 10. Dez. 2021 09:43    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 BranscheidGmbh 10 Unities + Antwort hilfreich

Vermutlich ginge auch einfach:

activeModelView.DisplayMode = 5

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

BranscheidGmbh
Mitglied
Dipl. Ing.


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

Beiträge: 49
Registriert: 15.01.2016

Solidworks Professional 2023 SP 5

erstellt am: 10. Dez. 2021 09:51    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

Das war's - ich danke euch beiden 


Hier noch die dazu passende Beschreibung aus der Hilfe :

To include the SOLIDWORKS type libraries manually:
    In an open project in VBA, click Tools, References. (Extras / Verweise)

    Select:
        SldWorks version Type Library
        SOLIDWORKS version Constant type library
        (Substitute the actual SOLIDWORKS version number for version.)
    Click OK.

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

BranscheidGmbh
Mitglied
Dipl. Ing.


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

Beiträge: 49
Registriert: 15.01.2016

Solidworks Professional 2023 SP 5

erstellt am: 10. Dez. 2021 09:56    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

Du hast recht, das klappt auch
Ich habe die Zuweisungen weg genommen, und dann nur "deinen" Befehl genutzt :

    Set swApp = Application.SldWorks
    Set Part = swApp.ActiveDoc
    Dim activeModelView As Object
   
    Set activeModelView = Part.ActiveView
    activeModelView.DisplayMode = 5

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)2024 CAD.de | Impressum | Datenschutz