|
CATIA V5 Programmierung : Problem mehrere Fenster
Aitec am 13.06.2018 um 16:29 Uhr (1)
Hallo CAD Community,ich stehe vor einem Problem, bei dem mir keine schöne Lösung einfällt. Dabei geht es um folgendes. Ich führe ein Makro aus welches verschiedene Operationen mit verschiedene Parts bzw. Produkten durchführt. Im laufe des Makros muss der User zwei verschiedene Punkte selektieren. Diese können im ersten Fall direkt mit im geöffneten Produkt zu finden sein. Jedoch können diese auch in einem zweiten Fenster geöffnet sein. Und hier liegt das Problem. Wie kann ich das Makro so gestallten, dass ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Trägheit mehrerer Flächen messen
Machiwi am 24.06.2012 um 13:04 Uhr (0)
Hey,da ist wohl beim kopieren was schief gelaufen, sorry. Natürlich muss das so heißen:Sub Catmain ()MsgBox "Wählen Sie den zu untersuchenden Körper aus", vbInformation, makroname + " " + version AppActivate "CATIA V5" Set selection1 = activedoc.Selection Dim InputObjectType(0) InputObjectType(0) = "AnyObject" Status = selection1.SelectElement2(InputObjectType, "Wählen Sie den Körper aus", False) If (Status = "Cancel") Then MsgBox "Makro wurde abgebrochen", 16, makroname + " " ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : open in new window
AndyMF am 28.09.2009 um 14:25 Uhr (0)
Hallo JoachimNormal geh ich davon aus das der User das produkt zuerst öffnet und daraus die einzelnen verbauten parts oder Produkts in neuem Fenster öffnet.Somit müsste window.item(1) dein Root sein.Wenn du den close befehl in die schleife mit Window.item(i).close reinhaust und erst die Schleife ab 2 losgehen lässt sollte es funktionieren.Würde aber zuerst das window.item(1) activieren, und dann die Schleife starten.GrußAndybeispiel:Language="VBSCRIPT"Sub CATMain()Set windowsopen = CATIA.WindowsMsgbox(wind ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Farbänderung einer Fläche
Catiatester am 18.11.2006 um 12:10 Uhr (0)
Mit diesen Code färbe ich die Flaechen oder auch Parts ein. Fläche anwählen - Makro aufrufen - fertig. Flaeche hat vordefinierte Farbe. Version: 1.0 Code: CATIA CATScript Zweck: Einfaerben der vorgewaehlten Flaechen bzw.Parts Farbe: Magenta StufenbohrungenCATIA.StatusBar = "CATScript, Version 1.0"Sub CATMain () Dim UserSelektion As Selection Set UserSelektion = CATIA.ActiveDocument.SelectionUserSelektion.VisProperties.SetRealColor 255, 0, 255, 1 End Sub
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Multisheets+ISO View aus Produkt erzeugen
bgrittmann am 28.12.2011 um 12:09 Uhr (0)
ServusBitte Systeminfo ausfüllen.Anbei Hinweise welche Funktion die du dazu benötigst. (näheres siehe Forensuche und V5Automaton.chm):- NewFrom aus der Documents-Collection- in einer Baugruppe kannst du mit der Products-Collection und der Funktion "Item" auf die Instanzen der Einzelteil/Unterbaugruppe zugreifen (zB Catia.ActiveDocument.Product.Products.item(1))- Such mal nach PartNumber bzw Nomenclature (beim Product-Object)- schau mal unter "Add" in der Sheets-Collection- Schau mal nach "DefineIsometricVi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Elemente in Drawing: Farbe ändern
Randle am 30.10.2008 um 16:02 Uhr (0)
Hallo,was der kollege da macht ist folgendes:Er sucht alle Elemente die eine bestimmte Farbe haben. In deinem Fall wäre das Orange (255,128,0)Diese Element färbt er dann einfach über die Selection um.Habe das mal mit dem Rekorder aufgezeichnet:Sub CATMain()Set drawingDocument1 = CATIA.ActiveDocumentSet selection1 = drawingDocument1.Selectionselection1.Search "Color=(255,128,0),all"Set selection2 = drawingDocument1.Selectionselection2.Search "Color=(0,0,0),all"End SubIch hoffe du kannst damit mehr anfangen. ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bauteile nach constraint isolieren
GeorgK am 29.07.2010 um 12:48 Uhr (0)
Hallo Bernd,den constraint selektiere ich so:Private Sub btn_select_Click() Me.Hide Dim oSel Dim sFilter(0) sFilter(0) = "Constraint" Dim oDoc As ProductDocument Set oDoc = CATIA.ActiveDocument Set oSel = oDoc.Selection oSel.Clear If oSel.SelectElement2(sFilter, "Constraint auswählen", False) = "Normal" Then Dim oCon As Constraint Set oCon = oSel.Item2(1).Value Call MsgBox("Name der Constraint:" + oCon.Name, vbInformation) txtbx_constraint = oCon.Name End If Me.ShowEnd Sub
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Koordinatensysteme - Position.getComponents
noir333 am 15.12.2008 um 17:59 Uhr (0)
Hallo w3e,also: wie die Lage zwischen den Teilen entsteht, ist völlig egal. In einem Product gitb es ein absolutes Koordinatensystem, das man allerdings nicht sehen kann. Wie oben schon gesagt, kann man es nur sichtbar machen, wenn man ein leeres Teil mit einem abs. Koosystem einfügt (ohne Verschiebung oder Constraints) und sieht wo es liegt.Um nun die Koos aus einem Part (gemessen mit measurable) in die oberste Baugruppe umzurechnen, muss man alle Baugruppenstufen rekursiv durchgehen und jede Transformati ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : AddNewAxisToAxis
DanielFr. am 05.06.2012 um 17:49 Uhr (0)
Hallo,und auch diese Mal helfen wir dir gerne weiter. Anbei mal ein Beispielskript (getestet auf R19) zur Erstellung von AxisToAxis-Transformationen mit Solids (hierfür wird die Funktion AxisToAxis2 verwendet (Flächenfunktion: AxisToAxis!!!)Code:Sub CATMain() ***HINWEISE by Daniel Frauenrath alias DanielFr. it´s free stuff for www.cad.de ***DEKLARATIONEN Dim objDoc As Document Dokument Dim objPart As Part Part-Dokument Dim objAxisSystems As AxisSystems Achsensysteme Dim objSourceAxis As AxisSystem ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hauptkörper und Part Nummer
bgrittmann am 19.03.2012 um 09:22 Uhr (0)
ServusWenn Umlaute oder Leerzeichen in einem Parameter vorhanden sind, muss dann bei der Formel der Parametername in Hochkomma gesetzt werden:Set formula1 = relations1.CreateFormula("Formel.1", "", dimension3, "smartVolume( " & Bodyname & " )")An die Teilenummer kommst du am besten über:partDocument1.product.Partnumberran.Du solltest versuchen bei der Formel für die Zeichnungsnummer nicht den Pfad zu den Parametern verwenden (was ist wenn das Part nicht mehr part1 heißt), sondern dafür die Funktion "GetN ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Winkel zwischen ZY Ebne und Linie?
sawah am 27.09.2011 um 16:12 Uhr (0)
Hallo zusammen,ich versuch die Winkel Zwischen eine Linie und ZY Ebene zu messen, ich habe das hier versucht, aber geht net:Code:Dim TheSPAWorkbench As WorkbenchDim aTheMeasurable, bTheMeasurable As MeasurableDim angle1Dim reference1 As ReferenceDim reference2 As ReferenceSet reference1 = CATIA.ActiveDocument.Part.HybridBodies.Item(4).HybridShapes.Item("LineNormal_1")Set reference2 = CATIA.ActiveDocument.Part.AxisSystems.Item("KOS_1Y")Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench") ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Findobject mit bestimmten String-Teil
sigma12 am 26.08.2013 um 16:25 Uhr (1)
Super Idee danke Habs über Instr probiert etc. nichts hat funktioniert. Auf den Strg-F-Befehl muss man kommen ! Problem ist jetzt nur noch wie ich das gefundene Object ( also die Selection)inBearbeitung setzte. Inwork und activate funktioniert ja mit selections nicht. DerAufzeichnungsassistent versagt auch ^^Ich möchte eigentlich nur den normalen Doppelclick "nach programmieren"Die V5-Automation war auch keine richtige Hilfe, da mir die Suchbegriffe fehlen (abgesehen von den genannten, Inwork, activate etc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Operatoren (Und/Oder) bei Suche
HoBLila am 30.01.2012 um 17:41 Uhr (0)
Genau, einfach Macrorecorder starten (am besten VBA) und aufzeichnen.Dann die Suche ausführen, also mit Selection und Makrorekorder anhalten.Der übersetzte String steht dann im Makro.Super einfach und super schnell.------------------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 Natur versucht, immer bessere Idioten zu bauenXing
|
| In das Form CATIA V5 Programmierung wechseln |
