|
CATIA V5 Programmierung : Parameter erkennen
tomtom1972 am 25.10.2006 um 10:01 Uhr (0)
Hallo,das geht ganz einfach mit Hilfe des TypeName. Damit bekommst du (als String) den Objecttyp zurück. Also Bsp (der 5 Parameter in einem Part):Set Param1 = Catia.ActiveDocument.Part.Parameters.Item(5)MsgBox TypeName(Param1)GrussTomTom------------------tomtom1972
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Probleme beim Umbennen von untergeordneten Products
Proofin am 25.10.2006 um 15:33 Uhr (0)
Hi BentelerBoy2,mit Warnungen ausschalten CATIA.DisplayFileAlerts = False ... Dein Code ... wichtig Alarm wieder einschalten es werden solange keine Warnungen mehr angezeigt bis diese Eigenschaft wieder auf TRUE gesetzt wird auch nicht nach dem Beenden von CATIA CATIA.DisplayFileAlerts = Truesollten die Meldungen nicht mehr erscheinen.Gruß Proofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter erkennen
Proofin am 25.10.2006 um 10:56 Uhr (0)
Hi Timberwolve,was willst du mit dem Parametern machen??Wenn du die Werte der Parameter auslesen willst brauchst du den Typ.Mit Dim sValue as String Set Param1 = Catia.ActiveDocument.Part.Parameters.Item(5) sValue = Param1.ValueAsStringbekommst du den Wert als String.GrußProofin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfad der geöffneten Datei übergeben
martin2 am 26.10.2006 um 11:59 Uhr (0)
Hallo!Leider bringt weder:MsgBox (CStr(CATIA.ActiveDocument.Path))nochMsgBox (CATIA.ActiveDocument.Path)eine vernünftige Lösung.Gruß Martin!
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Seite einrichten im Drawing
landre4 am 18.10.2006 um 10:22 Uhr (0)
Hallo zusammen,wer kann mir bei folgendem Problem helfen:im drawing kann man unter Datei/Seite einrichteneine Standardeinstellung festlegen.Wie kann ich diese per Makro z.B. von ANSI auf Firmenstandardändern.Versucht habe ich das bisher mit CATIA.ActiveDocument.Standard = Standart_Firmafunktioniert leider nicht.Danke schonmallandre4
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Hokay am 26.10.2006 um 12:34 Uhr (0)
Hallo TimberwolveNun funktioniert der Script in den Grundzügen.Danke schon einmal.Der ZeichenFaktor läßt sich einstellen. Language="VBSCRIPT" Sub CATMain() Dim drawingDocument1 As Document dim text as DrawingText Dim selection1 As Selection Set drawingDocument1 = CATIA.ActiveDocument Set selection1 = drawingDocument1.Selection selection1.Search "(CATTPSSearch.CATTPSText + CATDrwSearch.DrwText),all" Test Faktor Dim ModText as DrawingText Dim k as Integer For k = 1 to selection1.count Set Mod ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Hokay am 25.10.2006 um 14:44 Uhr (0)
Hallo Zusammenbei mir will das einfach nicht funktionieren!Benutzen im Moment V5R14SP7Kann mir bitte jemand helfen!!!!!Konkret will ich den Faktor auf 68% und den Abstand auf 25% ändern siehe JPGhier mein Script:Language="VBSCRIPT"Sub CATMain()Dim drawingDocument1 As Documentdim text as DrawingTextDim selection1 As SelectionSet drawingDocument1 = CATIA.ActiveDocumentSet selection1 = drawingDocument1.Selectionselection1.Search "(CATTPSSearch.CATTPSText + CATDrwSearch.DrwText),all"bis hier hin funktioniert d ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : speichern einer Oberfläche
Lasdi am 27.10.2006 um 20:14 Uhr (0)
hallo Tstone,ich habe ein Auslegungswerkzeug für Maschinenelemente unter der Anwendung von VBA innerhalb CATIA V5 .meine Oberfläche besteht aus eine Multipage,und die Ergebnisse meine Dimensionierung wird in einer Seite dieser Multipage dargesttelt.jetzt will ich wissen ob es möglich ist diese Seite zu speichern Danke
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Hokay am 25.10.2006 um 14:44 Uhr (0)
Hallo Zusammenbei mir will das einfach nicht funktionieren!Benutzen im Moment V5R14SP7Kann mir bitte jemand helfen!!!!!Konkret will ich den Faktor auf 68% und den Abstand auf 25% ändern siehe JPGhier mein Script:Language="VBSCRIPT"Sub CATMain()Dim drawingDocument1 As Documentdim text as DrawingTextDim selection1 As SelectionSet drawingDocument1 = CATIA.ActiveDocumentSet selection1 = drawingDocument1.Selectionselection1.Search "(CATTPSSearch.CATTPSText + CATDrwSearch.DrwText),all"bis hier hin funktioniert d ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Hokay am 26.10.2006 um 12:34 Uhr (0)
Hallo TimberwolveNun funktioniert der Script in den Grundzügen.Danke schon einmal.Der ZeichenFaktor läßt sich einstellen. Language="VBSCRIPT" Sub CATMain() Dim drawingDocument1 As Document dim text as DrawingText Dim selection1 As Selection Set drawingDocument1 = CATIA.ActiveDocument Set selection1 = drawingDocument1.Selection selection1.Search "(CATTPSSearch.CATTPSText + CATDrwSearch.DrwText),all" Test Faktor Dim ModText as DrawingText Dim k as Integer For k = 1 to selection1.count Set Mod ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Hokay am 25.10.2006 um 14:44 Uhr (0)
Hallo Zusammenbei mir will das einfach nicht funktionieren!Benutzen im Moment V5R14SP7Kann mir bitte jemand helfen!!!!!Konkret will ich den Faktor auf 68% und den Abstand auf 25% ändern siehe JPGhier mein Script:Language="VBSCRIPT"Sub CATMain()Dim drawingDocument1 As Documentdim text as DrawingTextDim selection1 As SelectionSet drawingDocument1 = CATIA.ActiveDocumentSet selection1 = drawingDocument1.Selectionselection1.Search "(CATTPSSearch.CATTPSText + CATDrwSearch.DrwText),all"bis hier hin funktioniert d ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Hokay am 26.10.2006 um 12:34 Uhr (0)
Hallo TimberwolveNun funktioniert der Script in den Grundzügen.Danke schon einmal.Der ZeichenFaktor läßt sich einstellen. Language="VBSCRIPT" Sub CATMain() Dim drawingDocument1 As Document dim text as DrawingText Dim selection1 As Selection Set drawingDocument1 = CATIA.ActiveDocument Set selection1 = drawingDocument1.Selection selection1.Search "(CATTPSSearch.CATTPSText + CATDrwSearch.DrwText),all" Test Faktor Dim ModText as DrawingText Dim k as Integer For k = 1 to selection1.count Set Mod ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Text Properties im Drawing
Hokay am 30.10.2006 um 16:41 Uhr (0)
Hallo Zusammen,Inzwischen habe ich herausgefunden / gesagt bekommen, dass mein Script im R16 läuft.Das nützt mir aber nichts, da wir noch in R14 unterwegs sind. Und das uach aus anderen Gründen nochn Stück sein werden.Nun hier noch einmal meine Frage etwas anders formuliert.Wie bekomme ich die Texteigenschaft Zeichenabstand unter R14SP7 geändert???Mit freundlichen GrüßenHeikoHier noch einmal der Script im Zusammenhang:Language="VBSCRIPT"Sub CATMain()Dim drawingDocument1 As Documentdim text as DrawingTextDi ...
|
| In das Form CATIA V5 Programmierung wechseln |
