|
CATIA V5 Programmierung : Übersetzung
Jens Hansen am 20.11.2008 um 11:13 Uhr (0)
mach doch einfach eine Schleife, wo du kontinuirlich alles Sets ab arbeitest:Dim i,jFor i = 0 To CATIA.ActiveDocument.Part.HybridBodies.Item(1).Countdim hb = CATIA.ActiveDocument.Part.HybridBodies.Item(1).Item(i)hb.Name = "Irgendwas" For i = 0 To hb.HybridBodies.Count dim hb1 = hb.HybridBodies.Item(j) hb1.Name = "Wiederwasanderes" next nextQuellcode ohne Gewähr da nicht getestet !!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 11:44 Uhr (0)
wenn alle Geom. Sets den selben Namen bekommen sollen, dann geht das. Für die Syntax der Suche benutzt du am besten den Makrorekorder. In der Siche dann einfach nur nach geometrischen sets mit dem entsprechenden Namen suchen.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: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
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
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 : Excel VBA mit Catscript starten
Jens Hansen am 24.11.2008 um 19:56 Uhr (0)
Hallo,ich vermute mal, dass die User-Eingabe fehlt - quasi der KLick auf OK.Aber warum gehst du denn den Umweg über die csv-Datei? Warum schreibst du die werte nicht direkt in die Excel-Tabelle?SGJens Hansen------------------Inoffizielle CATIA-HilfeseitePrivate SeiteXingKochbuch - CATIA V5 automatisieren
|
In das Form CATIA V5 Programmierung wechseln |