| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| |
| Innovationstag mit SolidCAM und Plogmann bei HEDELIUS in Meppen |
Autor
|
Thema: 2019 - Toleranzwerte anzeigen lassen? (1426 mal gelesen)
|
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 01. Okt. 2019 12:12 <-- editieren / zitieren --> Unities abgeben:
|
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 01. Okt. 2019 12:29 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
|
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 01. Okt. 2019 12:33 <-- editieren / zitieren --> Unities abgeben:
|
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 01. Okt. 2019 12:41 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
|
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 01. Okt. 2019 12:47 <-- editieren / zitieren --> Unities abgeben:
Ja und weißt du was beim normalen Maß habe ich es hinbekommen und bei der Koodinatenbemaßung kann ich es nicht hinbekommen. Warum das nicht? du die Klammer ist mir egal, hauptsache die Toleranzwerte werden mir angezeigt. [Diese Nachricht wurde von freierfall am 01. Okt. 2019 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 01. Okt. 2019 13:27 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
Hallo Sascha, bei der Ordinatenbemassung bekomme ich es nur so hin, dass ich per Makro auf Passung mit Toleranz stelle (Mass zuvor aktivieren) und dann die Passung neu wähle. Gruss Winni Makro: Dim swApp As Object Dim ModelDoc As Object Dim SelectionMgr As SelectionMgr Dim DispDim As Object Dim swDim As SldWorks.Dimension Dim i, retval As Long Const swSelDIMENSIONS = 14 Sub main() Set swApp = CreateObject("SldWorks.Application") Set ModelDoc = swApp.ActiveDoc Set SelectionMgr = ModelDoc.SelectionManager For i = 1 To SelectionMgr.GetSelectedObjectCount If SelectionMgr.GetSelectedObjectType(i) = swSelDIMENSIONS Then ' wenn es eine Bemaßung ist Set DispDim = SelectionMgr.GetSelectedObject3(i) ' an die Bemaßung anklinken Call DispDim.SetPrecision2(3, 3, 3, 3) Set swDim = DispDim.GetDimension retval = swDim.SetToleranceType(8) End If Next i Call ModelDoc.WindowRedraw ' und einmal den Bildschirm neu zeichnen lassen End Sub
[Diese Nachricht wurde von Winni-two am 01. Okt. 2019 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 01. Okt. 2019 13:53 <-- editieren / zitieren --> Unities abgeben:
|
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 02. Okt. 2019 09:03 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
Klammer in Makro integriert: Dim swApp As Object Dim ModelDoc As Object Dim SelectionMgr As SelectionMgr Dim DispDim As Object Dim swDim As SldWorks.Dimension Dim i, retval As Long Const swSelDIMENSIONS = 14 Sub main() Set swApp = CreateObject("SldWorks.Application") Set ModelDoc = swApp.ActiveDoc Set SelectionMgr = ModelDoc.SelectionManager For i = 1 To SelectionMgr.GetSelectedObjectCount If SelectionMgr.GetSelectedObjectType(i) = swSelDIMENSIONS Then ' wenn es eine Bemaßung ist Set DispDim = SelectionMgr.GetSelectedObject3(i) ' an die Bemaßung anklinken Call DispDim.SetPrecision2(3, 3, 3, 3) Set swDim = DispDim.GetDimension retval = swDim.SetToleranceType(8) Call DispDim.ShowTolParenthesis(True) End If Next i Call ModelDoc.WindowRedraw ' und einmal den Bildschirm neu zeichnen lassen End Sub
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 02. Okt. 2019 12:18 <-- editieren / zitieren --> Unities abgeben:
Du schlag mich nicht aber bei mir geht es nicht Also ich habe es in SWX 2018 getestet weil das gerade hier läuft. Musste erst wieder suchen. neues Macro erstellt und dein Program reinkopiert. In der Zeichnung ein Maß ausgewählt und unter Extra Macro ausführen. Fehler aber meine anderen Macros kann ich gar nicht mehr auswaählen, da diese eine ivb Endung haben und nun irgendwas mit swp. Brauchte diese auch sehr lange nicht mehr. sorry Sascha Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 02. Okt. 2019 13:20 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
|
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 02. Okt. 2019 14:02 <-- editieren / zitieren --> Unities abgeben:
|
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 02. Okt. 2019 14:26 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
|
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 02. Okt. 2019 14:34 <-- editieren / zitieren --> Unities abgeben:
|
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 02. Okt. 2019 14:39 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
|
Andreas Westphal Mitglied Trainer / Ingenieurbüro für SOLIDWORKS
Beiträge: 334 Registriert: 26.06.2000 Grundlagen- und Aufbauschulungen seit 1997 HP ZBook 17 G5 32 GB RAM NVIDEA Quadro P4200 WIN10 prof. X64 SOLIDWORKS 2020-2023
|
erstellt am: 02. Okt. 2019 14:49 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
Kannst du vielleicht auf die Koordinatenbemassung verzichten? Teste doch mal folgendes: Eine Längen- oder Durchmesserbemaßung ... Toleranz/Genauigkeit - Passung mit Toleranz. Das geht meines Wissens einfach bei Koordinatenbemaßunen nicht. Vielleicht kannst du damit leben. ------------------ Andreas Westphal SOLIDWORKS zertifiziert Ing.-Büro Westphal Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Winni-two Mitglied Ing. Maschb.
Beiträge: 154 Registriert: 12.03.2010 SW 2021 SP5 Intel Xenon W2135 @3.7GHz Win 10 64 bit Graka: Nvidia Quadro P4000 32 GB Ram
|
erstellt am: 02. Okt. 2019 15:03 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
|
freierfall Ehrenmitglied V.I.P. h.c. Techniker
Beiträge: 11547 Registriert: 30.04.2004 SWX (Pro) Flow 2020
|
erstellt am: 02. Okt. 2019 15:09 <-- editieren / zitieren --> Unities abgeben:
du Winni, ich habe nun dein Macro getestet und es geht noch nicht. Du vielleicht liegt es an den Vorlagen, es kann sein, dass ich diese schon zig Versionen mitnehme. Ich muss ein paar andere Berichte jetzt fertig machen. Dann nehme ich mal die Originalen von 2018 und teste es damit. Neustart vom Rechner ist gemacht. Ein Reset des Recorders - weiß ich leider nicht wie das geht und habe da keinen Knopf gesehen. @Andreas - das habe ich auch, nur hat sich Winni die Mühe gemacht und dann mache ich mir auch die Mühe und wenn es klappt, dann habe ich was ich will herzlich Sascha Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bk.sc Ehrenmitglied V.I.P. h.c. Konstrukteur Sondermaschinenbau
Beiträge: 2776 Registriert: 18.07.2012 -Solid Works 2019 SP5 -Pro Engineer WF 3
|
erstellt am: 02. Okt. 2019 16:34 <-- editieren / zitieren --> Unities abgeben: Nur für freierfall
Hallo Sascha, an den Vorlagen wird es kaum liegen, hab es jetzt auch mit älteren Versucht und es hat immer geklappt, einzige vorraussetzung ist das die Toleranz nicht händisch eingetippt wird sondern über die DropDown-Liste ausgewählt wird, da du sonst nur (0/0) Angezeigt bekommst. Gruß Bernd ------------------ --- Man muß nicht alles wissen, man muß nur wissen wo es steht --- Staatlich anerkannte Deutschniete Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |