Autor
|
Thema: Reaction / sichtbar / per Script schalten (384 mal gelesen)
|
WilliGo Mitglied Konstruktion
Beiträge: 102 Registriert: 20.02.2007 Catia V5 R14 - R19 Windows 10
|
erstellt am: 19. Jun. 2009 16:41 <-- editieren / zitieren --> Unities abgeben:
Hallo, wie kann man eine Reaction die als "Hidden objekts" versteckt liegt per script sichtbar schalten ? Ich möchte ein Set löschen ohne das ich den Hinweis von Catia bekomme das sich noch nicht sichtbare Elemente/ Reaction im diesem Set befinden. Mein gedanke ist erst die verstecketen Reaction sichtbar schalten und dann das Set mit sammt den Reaction löschen.
------------------ Willi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
DanielFr. Moderator Manager
Beiträge: 2506 Registriert: 10.08.2005 HP Compaq 8710w, Intel Core Duo T7700, 2,40 Ghz, 3GB RAM, Windows XP Professionel @32bit, Quadro FX 1600M, CATIA V5 R19 SP3
|
erstellt am: 19. Jun. 2009 18:13 <-- editieren / zitieren --> Unities abgeben: Nur für WilliGo
Hallo Willi, Reactions suchen -> Alle Selektions-Items durchlaufen -> die Reactions aus der Selektion holen -> die Eigenschaft .Hidden (ist eigentlich ein Bool aber bei mir gehts nur mit einer TypeConversation in String ) auswerten und reagieren Hier das Beipseil (auch der EDIT) Code:
Sub CATMain() Dim oDoc As PartDocument Dim oSel As Selection Dim myReaction As KnowledgeObject Set oDoc = CATIA.ActiveDocument Set oSel = oDoc.Selection oSel.Clear oSel.Search "(Name=* & CATKnowledgeSearch.AdvisorReaction),all" If oSel.Count > 0 Then For i = 1 To oSel.Count Set myReaction = oSel.Item(1).Value If CStr(myReaction.Hidden) = True Then myReaction.Hidden = False End If Next Else Box = MsgBox("Es wurden keine Reactions gefunden", vbInformation + vbOKOnly, "Reaction nicht gefunden") End If End Sub
------------------ MFG Daniel
Die KATJA ist halt doch nur ne zickige Französin Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|