|
CATIA V5 Programmierung : Part oder Product aus Drawing öffnen
bgrittmann am 13.06.2010 um 19:45 Uhr (0)
ServusDie Fall unterscheidng könnte über das Abfangen eines Fehlers geschehen. zB:Code:Sub CATMain()On Error Resume NextSet odoc = CATIA.ActiveDocumentSet oView = odoc.Sheets.ActiveSheet.Views.ActiveViewSet oProduct = oView.GenerativeBehavior.Document.ParentoName = oProduct.FullNameIf Err.Number 0 Then Set oProduct = oView.GenerativeBehavior.Document.Parent.Parent.Parent oName = oProduct.FullName Err.ClearEnd IfOn Error GoTo 0CATIA.Documents.Open (oName)End Sub(ungetestet). Allerdings fehlen dabei noch ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part oder Product aus Drawing öffnen
Lusilnie am 13.06.2010 um 15:24 Uhr (0)
Hallo GeorgK,als erstes einmal "Sorry", denn meine Aussage ist falsch! War wohl doch schon zu spät! Dein Code stimmt so:Code:Sub CATMain()CATIA.StatusBar = "Part öffnen, Version 1.0"Dim ReferenceComponent Set ReferenceComponent = drawingView1.GenerativeBehavior.Document.Parent CATIA.Documents.Open (ReferenceComponent.FullName)End SubAllerdings funktioniert er nur bei "normalen" Ableitungen vom 3D! Bei "Szenen" läuft er auf einen Fehler, da hier das "Document" die Szene ist und deren "Parent" dann die " ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ersetzen der
Wishmaster am 22.06.2010 um 09:43 Uhr (0)
Hallo Zusammen,vielen Dank für die Antworten! Ich habe das Skript noch erweitert und mit zusätzlichen Funktionen in VBA zum laufen bekommen! Eure Anworten waren sehr Hilfreich!Jetzt habe ich leider eine neue Frage Kann ich ein vorhandenes Geoset bei bedarf unter ein anderes Geoset unterhängen (also in Catia: "change Geometrical set", bei Nachfrage auf "Nein" klicken)? DerMakrorekorder zeichnet leider nichts auf Habe auch in der Suche und in der Litertatur bisher nichts finden können...Vielleicht hat ja j ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ersetzen der
Lusilnie am 23.06.2010 um 00:31 Uhr (0)
Hallo Wishmaster,das geht z.B. mit "Cut & Paste" aus bzw. in die jeweilige Selektion:Code:Set iSel = CATIA.ActiveDocument.SelectioniSel.CleariSel.Add CATIA.ActiveDocument.Part.HybridBodies.Item("Geometrical Set.2")iSel.CutiSel.CleariSel.Add CATIA.ActiveDocument.Part.HybridBodies.Item("Geometrical Set.1").HybridBodiesiSel.PasteCATIA.ActiveDocument.Part.UpdateDamit kannst Du in einem separat geöffneten CATPart das "Geometrical Set.2" (auf Part-Ebene) unter das (ebenfalls auf Part-Ebene liegende) "Geometrical ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ersetzen der
roccat am 14.06.2010 um 10:37 Uhr (0)
Hallo,ich weiss nicht ob ich dich richtig verstanden habe aber evtl. hilft die das hier. Musst natürlich noch Punkte Namen und Geometrical Set anpassen. Kannst natürlich auch eine UserSelection einbauen um an die Punkte zu kommen.Option ExplicitSub CATMain()Dim MyPartDocument As PartDocumentDim MyPart As PartDim MyHybShapeFactory As HybridShapeFactoryDim MyHybShapeTranslate As HybridShapeTranslateDim Reference1 As ReferenceDim Reference2 As ReferenceDim Reference3 As ReferenceDim MyHyb ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Erzeugung eines positionierten Sketch
roccat am 14.06.2010 um 11:11 Uhr (1)
Also ich habe das mal geteste,ist wirklich so wie vermutet.Der Sketchtyp ist und bleibt auch mit dem Code aus dem o.g. Link ein "Sliding Sketch"welchen wir bei uns aber nicht verwenden dürfen.CATIA.StartCommand "Positioned Sketch" - ruft mir zwar das Fenster auf bringt mich aber auch nicht wirklich weiter.Evtl. hat noch jemand eine noch Idee zu diesen Thema.THXMario
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bedienung eines CATIA Fensters aus fremden Thread
PierreM21 am 08.07.2022 um 14:29 Uhr (1)
Hallo,ich schreibe derzeit eine .Net App, die die Inputs (Mouse/Keyboard) eines CATIA Users simuliert. Ich will damit ein Prozess automatisieren, welches die Funktion Unfold (Workbench GSD) nützt. Ich hätte gerne die Funktion über die Automation API verwendet, allerdings ist die API an der Stelle -leider- nicht ausreichend für mein Szenario ("Transfer" Funktion nicht unterstürzt), deswegen der Weg über Windows Handling (user32.dll / SendMessage).Dieser Weg funktioniert auch ziemlich gut, ich kann die meist ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CreateReferenceFromObject Problem
rattlesnake am 14.06.2010 um 11:20 Uhr (0)
Hallo zusammen,ich versuche gerade mein erstes Projekt unter VB .NET zu erstellen. Hab zuvor mit VBA geschrieben und da eine spezielle Funktion erstellt, welche mit ein Body PasteSpecial As Result macht:Code:Sub CATMain() Dim tPart As Part Set tPart = CATIA.Documents.Item("Part7.CATPart").Part Dim body1 As Body Set body1 = tPart.Bodies.Item("TestBody") Dim tBody As INFITF.AnyObject Set tBody = PasteSpecial(body1, tPart) Dim tReference As INFITF.Reference Set tReference = tPart.CreateReference ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Datenrettung bei Click OK to Terminate
HoBLila am 14.06.2010 um 11:43 Uhr (1)
Die Idee gefällt mir.Auch in temporären Ordnern sind CATIA-Daten aus der aktiven Sitzung hinterlegt, die beim OK oder neu Starten oft bereinigt werden. Diese sind manchmal auch von Nutzen, wie Trace-Files, in der Richtung könntest Du eventuell auch noch denken.CATIA nutzt solche Files für den Warmstart.------------------Mit freundlichen Grüßen,Henry Schneideralias LilaEs gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,die ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Umbenennen von Parts
Struppi0909 am 14.06.2010 um 12:21 Uhr (0)
Hi Robertdein Script ist OK. Nur leider prüft dein Script über den Dateinamen die Part Number bzw.den Instancename und gleicht in mit dem Dateiname ab.Die Part Number bzw.den Instancename werden abgeglichen und notfalls ersetzt und als text-File heraus geschrieben. Das ist auch OK.Nach deinem script haben die Dateien dieses Format(Soweit OK)Beispiel:Dateiname/ Part Number/ Instancenameaaa_ET001/aaa_ET001/aaa_ET001bbb_ET001/bbb_ET001/bbb_ET001Wenn ich aber jetzt mein script darüber laufen lasse, das die Par ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Umbenennen von Parts
roccat am 14.06.2010 um 12:40 Uhr (0)
Hallo Struppi,du kannst ja bei einem Fehler das entsprechende Part in einer Selection reinhauen und ein center graph draufmachen. Ich gebe sowas auch gern in einer listbox aus und schreibe die Fehlerhaften Producte in ein Array dan kannst du alle fehlerhaften elemente Auflisten und Click im Listeneintrag das passende Product abrufen musst das Array bloss Global Dimen. Der Möglichkeiten gibts da viele.z.B.Function traverse(Prod, origstr, newstr)Dim MyDocument As DocumentDim MySelection As SelectionSet MyDoc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Elemente eines gesuchten GeoSets
NormannK am 14.06.2010 um 14:00 Uhr (0)
Hallo,ich versuche schon eine Weile in einer Part Struktur ein bestimmtes Geoset zu finden und dann die Untergeordneten Elemente zu bearbeiten.Das Suchen selber ist soweit kein Problem.Code:Set Selected = CATIA.ActiveDocument.SelectionSelected.ClearName_geoset = "Geosetname"Selected.Search "(Name=" & Name_geoset & " & CATGmoSearch.OpenBodyFeature),all"Aber wie kann ich auf z.B. die Namen der untergeordneten Elemente zugreifen?meine Versuche z.B. mitCode:MsgBox (Selected.Item(1).Name) schlugen leider fehl.D ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Umbenennen von Parts
roccat am 14.06.2010 um 14:13 Uhr (0)
Sry Catscript, das hab ich nicht gesehen.bei der Error abfrage kannst du dann reinschreiben was du willst, das "exit function" kannst du auch weglassen dann überspringt er den Fehler und arbeitet alles weitere ab. Dann wäre es aber sinnvoll alle Fehlerhaften Dokumente zum Schluss aufzulisten.dann versuchs mal so:Function traverse(Prod, origstr, newstr)Set MyDocument = CATIA.ActiveDocumentSet MySelection = MyDocument.SelectionErr.ClearOn Error Resume Next Set refp = Prod.ReferenceProduct If InStr(refp.Name, ...
|
| In das Form CATIA V5 Programmierung wechseln |
