|
CATIA V5 Programmierung : CATIA friert ein während Makro läuft
marbat am 16.07.2008 um 13:27 Uhr (0)
Hallo Tiberius,in der V5Automation.chm zu finden.Clears the selection. Example: This example clears the selection. The selection is then empty. CATIA.ActiveDocument.Selection.Clear() Gruß Martin------------------mb
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mehrere Funktionen in einem Makro
marbat am 05.08.2009 um 09:22 Uhr (0)
Hallo Bettina,eine Function darf nicht innerhalb einer Function oder Sub definiert werden.so funktioniert esLanguage="VBSCRIPT"Sub CATMain()Summe1 = Addition(a, b)Produkt = Multiplikation(a, b)If Summe 10 Then a = a + 2 Produkt2 = Multiplikation(a,b)else Msgbox "a 10"End IFEnd SubFunction Addition(c, d) Addition = c + dEnd Function Function Multiplikation(c,d) Multiplikation = c * dEnd Function ------------------mb
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bedingungen in- bzw aktivieren
marbat am 06.08.2009 um 10:46 Uhr (0)
Hallo Danny,so kannst du alle Bedingungen in einem geöffneten Produkt aus- und einschalten Language="VBSCRIPT"Sub CATMain()Dim productDocument1 As DocumentSet productDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = productDocument1.Selectionselection1.Search "Name:*Bedingungen*;Alle"Set visPropertySet1 = selection1.VisProperties visPropertySet1.SetShow 1 ausvisPropertySet1.SetShow 0 ein End SubGruß Martin------------------mb
|
| In das Form CATIA V5 Programmierung wechseln |
|
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
|
| In das Form CATIA V5 Programmierung wechseln |
|
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
|
| In das Form CATIA V5 Programmierung wechseln |
