|
CATIA V5 Programmierung : Case Verzweigung
BettinaRauch am 23.07.2009 um 07:43 Uhr (0)
Hallo,mein kleines Problem ist zwar wahrscheinlich auch mit der Hilfe von anderen Forum-Einträgen zu lösen, da die Suchmaschine aber immer noch offline ist, hoffe ich, dass mir so auch schnell geholfen wird.Hab einen Parameter (Typ Boolean) in meinem Part erstellt und will jetzt mit nem Makro ne Case-Verzweigung abfragen, das funktioniert aber nicht so wie ich es will. Die Abfrage springt immer in die CaseElse-Anweisung, egal wie ich den Parameter einstelle, bzw. was ich ins Makro schreibe. Ok, das stimmt ...
|
|
CATIA V5 Programmierung : Case Verzweigung
marbat am 23.07.2009 um 09:56 Uhr (0)
was kommt so raus ?Sub CATMain()Set Parameter = CATIA.ActiveDocument.Part.ParametersSet Para1 = Parameter.item ("DIN 6935")Var4 = Para1.ValueMsgBox (Var4)If Var4 Then MsgBox "wahr " & Var4Else MsgBox "blöd" & Var4 End IfEnd SubGruß Martin------------------mb
|
|
CATIA V5 Programmierung : Case Verzweigung
bgrittmann am 23.07.2009 um 08:33 Uhr (0)
ServusMüsste es nicht:Code:Sub CATMain()Set Parameter = CATIA.ActiveDocument.Part.ParametersSet Para1 = Parameter.item ("DIN 6935")Var4 = Para1.ValueSelect Case Var4Case TrueMsgBox (Var4)Case ElseMsgBox ("blöd")End SelectEnd Subheißen?GrußBerndPS: Mit Google funktioniert die Suche immer noch zB "case catia site:cad.de" oder allgmein nur nach "VB case"------------------Warum einfach, wenn es auch kompliziert geht.
|
|
CATIA V5 Programmierung : Case Verzweigung
marbat am 23.07.2009 um 09:33 Uhr (0)
Hallo Bettina,für die Fehlersuche oft hilfreich ist den Wert derVariablen zu überprüfen. Da ein Debugger in CATIA fehlt,ist die Msgbox ein gutes MittelWas enthält Var4 ?Sub CATMain()Set Parameter = CATIA.ActiveDocument.Part.ParametersSet Para1 = Parameter.item ("DIN 6935")Var4 = Para1.ValueMsgBox (Var4)Select Case Var4Case trueMsgBox (Var4)Case falseMsgBox ("blöd")End SelectEnd SubGruß Martin------------------mb
|
|
CATIA V5 Programmierung : Case Verzweigung
BettinaRauch am 23.07.2009 um 16:25 Uhr (0)
Hi,Danke für eure Inforamtionen. Leider muss ich gestehen, dass ich damit nicht wirklich weitergekommen bin. Ich hab auch noch ein paar Bücher zur Makroprogrammierung auf meinem Tisch liegen, aber funktionieren tut es trotzdem nicht.Hier mal mein erstes Problem:Hab einen Parameter erzeugt (length). Dann hab ich ne If-Anweisung geschrieben. Das funktioniert auch:--------------------Set Parameter = CATIA.ActiveDocument.Part.ParametersSet Para1 = Parameter.item ("Radius")Var1 = Para1.ValueIf Var1 "0" Then Ms ...
|
 |
CATIA V5 Programmierung : Problem beim Umbenennen einer CATIA Struktur mittels Rekursiverschleife
tobiley am 18.03.2011 um 15:51 Uhr (0)
Hallo,ich habe ein VB.NET geschrieben, welches eine CATIA Struktur umbenennt und unter dem neuen Namen abspeichert. Das funktioniert soweit auch ganz gut.Das Problem ist, dass der Instancename nur in der ersten Ebene umbenannt wird. (Die PartNumber jedoch einwandfrei!)Hat jemand eine Idee woran das liegen lönnte?Den Code habe ich unte angefügt. Ein Bild der Strktur ist im Anhang.Vielen Dank für eure Hilfe!Code: Sub SUB_SCAN(ByVal oProducts, ByVal UebergabeName, ByVal auftragsnummer) Dim oProductsUeberg ...
|
|
CATIA V5 Programmierung : Aufmassfläche via Makro
Randle am 04.08.2009 um 09:43 Uhr (0)
Hallo,ich habe mit jetzt deinen Code nicht im Detail angesehen, aber ich habe folgende Vermutung.Du erzeugst im Vorfeld per Script "jede Menge" Elemente innerhalb eines GeoSets. Dann willst du ein Aufmass erstellen (=Solidelement), in Bearbeitung ist aber immer noch das GeoSet. Nun kommt beim manuellen Erstellen des Aufmasses eine Fehler/Hinweismeldung. Diese kannst du mit deinem Makro nicht abfangen und dein Script steigt aus. Versuche doch mal vor der Erstellung (d)einen Körper in Bearbeitung zu setzen, ...
|
|
CATIA V5 Programmierung : open in new window
Shamrock2 am 29.09.2009 um 08:29 Uhr (0)
Hallo Andy,irgendwie klappt das so nicht, wie ich es mir vorstelle.Fall 1Ich habe folgenden Code:Set WindowsOpen = CATIA.Windowsfor w = WindowsOpen.count to 2 step -1 WindowsName = WindowsOpen.item(w).name Set WindowsSelect = WindowsOpen.item(WindowsName) WindowsSelect.Activate WindowsSelect.ClosenextDie Fenster werden rückwärts, der Reihe nach per "Activate" in den Vordergrund gelegt, aber nicht geschlossen - es erscheint auch keine Fehlermeldung!Fall 2Dann habe ich anstatt des "WindowsSelect.Close" folge ...
|
|
CATIA V5 Programmierung : Parameter einer Selection ändern
pHidias am 28.09.2009 um 16:21 Uhr (0)
moin mein problem geht in die gleiche richtung, dass ich noch nicht ganz verstehe, wie ich auf komponenten zugreifen kann.als beispiel möchte ich eine länge in einer skizze verändern. gefunden habe ich die länge im watchfenster in folgendem ast:CATIA.ActiveDocument - Part - Parameters - Item 9 - Value(Name ("NameGeometrisches Set.1Skizze.1Länge.5Länge") und so weiter gibts unter item9 natürlich auch)wie muß nun genau der aufruf aussehen, damit ich da die länge ändern kann?------------------ ---- Hier könn ...
|
|
CATIA V5 Programmierung : open in new window
AndyMF am 28.09.2009 um 13:52 Uhr (0)
HalloDu musst auf die Catia windows gehen!Hier ein kleines Beispiel wie du an die Anzahl bzw an die Namen der Windows kommst :Language="VBSCRIPT"Sub CATMain()Set windowsopen = CATIA.WindowsMsgbox(windowsopen.count)for i = 1 to windowsopen.countmsgbox(Catia.windows.item(i).name)nextEnd SubIch hoffe das hilft dir weiter !Gruß Andy
|
|
CATIA V5 Programmierung : open in new window
AndyMF am 29.09.2009 um 09:00 Uhr (0)
Guten morgen Joachimich sehe das du nicht das document abfragst sondern nur das window im Fall 1.Ich hab durch den windowname auf das Document zugegriffen in meinem Codeset doctoclose = CATIA.Documents.Item(Catia.windows.item(i).name)Bau dir mal eine Abfrage für das document ein ob es gesavet werden mußdaran kommst ud über set CATIA.Documents.Item(Catia.windows.item(i).name).savedDa siehst du dann ob das Document in dem window verändert wurde oder nicht!Je nach umgebung von windows kommt dann Wahr bzw True ...
|
|
CATIA V5 Programmierung : open in new window
AndyMF am 28.09.2009 um 14:25 Uhr (0)
Hallo JoachimNormal geh ich davon aus das der User das produkt zuerst öffnet und daraus die einzelnen verbauten parts oder Produkts in neuem Fenster öffnet.Somit müsste window.item(1) dein Root sein.Wenn du den close befehl in die schleife mit Window.item(i).close reinhaust und erst die Schleife ab 2 losgehen lässt sollte es funktionieren.Würde aber zuerst das window.item(1) activieren, und dann die Schleife starten.GrußAndybeispiel:Language="VBSCRIPT"Sub CATMain()Set windowsopen = CATIA.WindowsMsgbox(wind ...
|
|
CATIA V5 Programmierung : open in new window
AndyMF am 28.09.2009 um 15:20 Uhr (0)
Hallo Joachimsry hatte nen Fehler im letzten Code ! Hab aber noch nich berücksichtigt das alle Files gesaved sein sollten!Language="VBSCRIPT"Sub CATMain()Set windowsopen = CATIA.WindowsMsgbox(windowsopen.count)for i = windowsopen.count to 2 step -1set doctoclose = CATIA.Documents.Item(Catia.windows.item(i).name)doctoclose.closenextEnd SubGruß Andy
|
