|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 20.11.2008 um 13:14 Uhr (0)
Dafür sind wir doch da SGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 20.11.2008 um 13:51 Uhr (0)
Hast du eine Suche nach Parametern ausgezeichnet? Wie sieht dein Quellcode da aus ??------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Beemer328 am 20.11.2008 um 14:03 Uhr (0)
Language="VBSCRIPT"Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = partDocument1.Selectionselection1.Search "(Name=Symmetry & CATKnowledgeSearch.InternalParameter),all"End Sub
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 20.11.2008 um 14:12 Uhr (0)
Laut online-dokun wird der Name eines Paramaters nicht über .Name geändert sonder es muss di Funktion Rename aufgerufen werden. Für deinen Fall hieße das:Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = partDocument1.Selectionselection1.Search "(Name=Symmetry & CATKnowledgeSearch.InternalParameter),all"For iI = 1 To CATIA.ActiveDocument.selection.Count Dim param1 = CATIA.ActiveDocument.selection.Item(iI).Value param1.Rename("Hierk ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Curve Smooth
Jens Hansen am 20.11.2008 um 14:25 Uhr (0)
Hallo,Laut online-doku gibt es doch für HybridShapeCurveSmooth die Eigenschaft CurvatureThreshold, wo dann der Grenzwert eingetragen wird.Geht das darüber nicht ?SGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 20.11.2008 um 14:49 Uhr (0)
dann versuchs mal mitDim param1 as Parameterparam1 = CATIA.ActiveDocument.selection.Item(iI).Value------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Beemer328 am 20.11.2008 um 15:09 Uhr (0)
Ich war mir nicht sicher an welcher Stelle das rein muss. Habs mal so probiert, ging aber nicht.Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = partDocument1.Selectionselection1.Search "(Name=Symmetry & CATKnowledgeSearch.InternalParameter),all"For iI = 1 To CATIA.ActiveDocument.selection.Count Dim param1 as Parameterparam1 = CATIA.ActiveDocument.selection.Item(iI).Value param1.Rename("HierkommtderneueNamerein")
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 19.11.2008 um 14:42 Uhr (0)
Hallo,sowas lässt sich ganz gut mit einem Class-Modul unter vba lösen. In einem Modul werden für das jeweilige Objekt die jeweiligen Wörten in den einzelnen Sprachen hinterlegt. In dem eigentlichen Start-Modul (beginnt dann mit CATMain()) wird das makro geschrieben, was dann wieder die Namen aus dem ersten Modul sich heraus holt.Hat man das jetzt verstanden ??Naja.. zumindest gehts mit den Bordmitteln von V5 im VBA-EditorSGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 19.11.2008 um 15:28 Uhr (0)
hm.. ich versuchs mal so einfach wie möglich. Am besten im VBA-Editor ein neues Class-Modul mit dem Namen "multisprache" erstellen und folgenden Quelltext eingeben:-------------Dim sprache As StringDim T0 As String Text in der jeweiligen SpracheSub Start(sprache)Spezifische Texte festlegenSelect Case sprache Case "DE" T0 = "Es klappt ja wirklich " Case "EN" T0 = "It really works "End SelectWeiterführende Routine startenCall MessageEnd SubPrivate Sub Message() MsgBox T0, vbInformation, makroname + ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 19.11.2008 um 16:07 Uhr (0)
Den Quellcode sollte ohne Fehler übernommen werden; einfach kopieren und in die Class_Module einfügen - fertig.Einen Link zum Buch findest du in meiner SignaturSGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 19.11.2008 um 17:02 Uhr (0)
Dafür kannst du eine Schleife schreiben, in der alle Bodies der Reihe nach angesprochen und umbenannt werden. Für den Namen des jeweiligen Body gibst du dann die Variable T0 + der Instanznummer (.1 bzw. .12) an. Das ist dann eine reine Stringkonvertierung. Das Selbe dann für Geometrische Sets.SGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 19.11.2008 um 18:42 Uhr (0)
Instanznummer ist z.B. sketch.1 oder Body.5 oder Pad.2 - also .InstanzDie sollte bei der Umbenennung behalten werden, sonst heitß später jeder Körper einfach nur Body; und das nützt keinem.Die Schleife kannst du am besten als eine for-schleife machen. Schau hierfür mal in dem Buch vom Ziethen nach.SGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Referenz -> Objekt
u01dz am 05.08.2003 um 07:57 Uhr (0)
Hi,wenn Du die funktionalen Flächen eines Volumenkörpers suchst und findest, kann CATIA Dir hierzu nur eine Referenz aufbauen, da es sich nicht um ein Flächenobjekt handelt. Objekte sind nur Elemente, die auch im Konstruktionsbaum verfügbar sind.------------------Tschüß, Dieter
|
| In das Form CATIA V5 Programmierung wechseln |
