| | |  | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für CATIA & Co. | | | |  | KISTERS 3DViewStation: Neuer Strukturvergleich ab sofort verfügbar, eine Pressemitteilung
|
|
Autor
|
Thema: Gewinde selektieren, die über Muster erzeugt wurden (742 mal gelesen)
|
JochenG
Mitglied
   Beiträge: 8
Registriert: 15.11.2001
|
erstellt am: 19. Aug. 2003 11:26  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, ich habe ein Script zum Einfärben von Gewinden geschrieben. Um alle Gewindebohrungen zu selektieren habe ich nachfolgende Befehle verwendet: selection1.Search "'Part Design'.Bohrung.Gewinde=TRUE"
set visPropertySet1 = selection1.VisProperties
visPropertySet1.SetRealColor 255,255,0,0 Gibt es eine Möglichkeit, Gewindebohrungen zu erkennen, die über eine Musterfunktion (z.B. Rechteckmuster) erzeugt wurde? Danke vorab Jochen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tr
Mitglied
Dipl.-Ing., Maschinenbau
Beiträge: 32
Registriert: 12.05.2003
|
erstellt am: 01. Sep. 2003 09:15 <-- editieren / zitieren --> Unities abgeben: Nur für JochenG 
Hallo Jochen, mit der Funktion set Orginal = mypattern.ItemToCopy kommst Du vom Pattern, bzw. Muster auf das Ausgangsobjekt. Da sieht man dann, ob´s ein Gewinde ist oder nicht. Wenn ja kann das komplette Muster eingefärbt werden. tr Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
JochenG
Mitglied
Beiträge: 8
Registriert: 15.11.2001 CATIA V5 R10 SP7
|
erstellt am: 01. Sep. 2003 19:19 <-- editieren / zitieren --> Unities abgeben:
Hallo tr, danke für Deine Antwort, stehe allerdings entweder auf dem Schlauch oder CATIA möchte nichts erkennen. Nachdem ich relativ wenig in der Online-Hilfe gefunden habe, versuchte ich folgende Suchroutine: selection1.Search "'Part Design'.Bohrung.Gewinde=TRUE"
set visPropertySet1 = selection1.ItemToCopy
visPropertySet1.SetRealColor 255,255,0,0 -> leider ohne Erfolg. tr, kannst Du vielleicht nochmals deine Antwort detailieren? Danke vorab. Jochen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
louis
Mitglied
Geschäftsführer
Beiträge: 93
Registriert: 07.05.2001 V5 R19/R2014, WIN7, Visual Basic6.0 SP6
|
erstellt am: 02. Sep. 2003 10:13 <-- editieren / zitieren --> Unities abgeben: Nur für JochenG
Hallo Jochen, Du musst alle UserPattern in Deinem Part durchsuchen und mit dem Befehl: set MyBohrung = mypattern.ItemToCopy das vervielfältigte Element zuweisen. Nun gibt es 2 Möglichkeiten. Entweder Du schaust nach der Farbe von MyBohrung und setzt die gleiche Farbe auf Dein UserPattern oder Du prüfst 1.) ob MyBohrung auch wirklich eine Bohrung ist und 2.) wenn ja ob die Bohrung ein Gewinde ist. Dann kannst Du die Farbe Deines UserPattern wie gewünscht zuweisen mit mySel.clear
mySel.Add mypattern
set visPropertySet1 = mySel.VisProperties
visPropertySet1.SetRealColor 255,255,0,0 Wenn Du noch Fragen hast melde Dich. Im Gegenzug würde ich mich freuen, wenn Du das Script nach Fertigstellung hier zur Verfügung stellst. Es ist eine gute Idee alle Gewinde anders farblich darzustellen ! Viele Gruesse Louis
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
 |
Foren auf CAD.de (alle Foren)
| 
