| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| Intertool 2024 |
Autor
|
Thema: API: ModelDocExtension.RemoveTexture () (1948 mal gelesen)
|
Stefan Ansgar Böttcher Mitglied Stundent und Hilfskraft in Konstr.Büro
Beiträge: 62 Registriert: 15.07.2003
|
erstellt am: 11. Mai. 2004 20:01 <-- editieren / zitieren --> Unities abgeben:
Hiho! Ich würde gerne per Makro die Textur des Aktiven Documents entfernen. Dafür ist ja eingentlich status = ModelDocExtension.RemoveTexture () gedacht, aber leider will das bei mir nicht funktionieren: Set swModel = swApp.ActiveDoc Set docext = swModel.Extension bool = docext.RemoveTexture() funktioniert leider nicht... Hab es auch alternativ mal mit: DateiMitPfad = swModel.GetPathName() bool = swModel.Extension.SelectByID(DateiMitPfad, "COMPONENT", 0, 0, 0, False, 0, Nothing) bool = swModel.Extension.ApplyTexture(5.85206, 1, "", 1) versucht, aber das tuts auch nicht... Weiß jemand Rat? töö Ansgar.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 10. Mai. 2016 13:09 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
ACHTUNG! Sie antworten auf einen Beitrag der älter als 1 Jahr ist! Es ist schon ein Weilchen her und ich weiß nicht, ob du das Problem noch hast. Da es aber bei mir gerade akut ist, hier die Lösung: Code: Dim swApp As ObjectDim Part As Object Dim boolstatus As Boolean Dim longstatus As Long, longwarnings As Long Sub main() Set swApp = _ Application.SldWorks Set Part = swApp.ActiveDoc boolstatus = Part.Extension.RemoveTexture2("") End Sub
RemoveTexture2 erwartet den Konfigurationsnamen, für den die Textur entfernt werden soll. Wenn das leer "" bleibt, dann wird die Textur bei der aktuellen Konfiguration entfernt. ------------------ Klaus www.al-ko.com | mein Gästebuch Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
MAUI89 Mitglied Technischer Zeichner
Beiträge: 82 Registriert: 10.02.2015 Solidworks 2020 SP05 Win 10 (64 Bit) CPU: Intel Xeon E3-1285 v6 4,10 GHz RAM: 32 GB
|
erstellt am: 23. Mai. 2016 10:40 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
Moin, ich hab hier ein Teil, da funzt es mit deiner Lösung nicht und ich hatte auch schon ein paar andere Makros ausprobiert, aber diese Texturen bekomme ich irgendwie nie gelöscht Vielleicht hast du dazu ja auch noch eine Idee. Mfg Steffen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 23. Mai. 2016 16:47 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
|
MAUI89 Mitglied Technischer Zeichner
Beiträge: 82 Registriert: 10.02.2015 Solidworks 2020 SP05 Win 10 (64 Bit) CPU: Intel Xeon E3-1285 v6 4,10 GHz RAM: 32 GB
|
erstellt am: 23. Mai. 2016 16:51 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
Sry...aber ich glaub das war auch nicht absicht Ich weiß auch nicht, bei den Ur-Alt-Teilen ist das irgendwie komisch. Bei neu erstellten funzt es ohne Probleme, aber die alten machen einem ja immer nen Strich durch die Rechnung Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Carsten1210 Mitglied staatl. geprüfter Holztechniker
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: 23. Mai. 2016 20:23 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
Hi, Geht es da nur um die Grundtextur auf dem Teil oder auch um die Farbe auf dem Körper?! Für die Grundtextur funktioniert dies hier bei mir:
Code: Sub main() Set swApp = Application.SldWorks Set swModel = swApp.ActiveDoc swModel.Extension.RemoveMaterialProperty swAllConfiguration, Nothing swModel.EditRebuild3 End Sub
Gruß, Carsten Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
KMassler Ehrenmitglied V.I.P. h.c. CAD Admin + Mädchen für Alles...
Beiträge: 2675 Registriert: 06.11.2000 SolidWorks Start 1999 ** CSWP 01/2008 ** ------------------ Zuletzt beruflich: - SWX2020 SP5; - SAP/PLM+ECTR; - DriveWorks Pro; - Programmierung: VBA, aktuell Visual Studio 2022/VB.Net ------------------ ab 2024 (privat): Onshape und anderes
|
erstellt am: 24. Mai. 2016 09:47 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
|
MAUI89 Mitglied Technischer Zeichner
Beiträge: 82 Registriert: 10.02.2015 Solidworks 2020 SP05 Win 10 (64 Bit) CPU: Intel Xeon E3-1285 v6 4,10 GHz RAM: 32 GB
|
erstellt am: 24. Mai. 2016 10:34 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
|
Carsten1210 Mitglied staatl. geprüfter Holztechniker
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: 24. Mai. 2016 11:15 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
Hi MAUI89, Dann musst du alle Bodies und wahrscheinlich alle Flächen durchlaufen da ja die Texturen und Farben auch auf diese angewendet werden können. Um die Farben von den Bodies zu entfernen müsstest du auf "MaterialPropertyValues2" zurück greifen. Gruß, Carsten Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| |
MAUI89 Mitglied Technischer Zeichner
Beiträge: 82 Registriert: 10.02.2015 Solidworks 2020 SP05 Win 10 (64 Bit) CPU: Intel Xeon E3-1285 v6 4,10 GHz RAM: 32 GB
|
erstellt am: 24. Mai. 2016 11:17 <-- editieren / zitieren --> Unities abgeben: Nur für Stefan Ansgar Böttcher
|