|
CATIA V5 Programmierung : Volumen von einem Body/Part ermitteln und in MsgBox dargstellen
Florian Held am 09.06.2009 um 20:10 Uhr (0)
Hi,Ausgangssituation: - geöffnet (aktives Document) = PartErgebnis des Beispielmakros: - Es werden alle Körper durchlaufen (egal ob "direkt" im Part oder mittels boolscher Operation in anderem Körper) und wenn das erste Feature in einem Körper ein Volumen ist wird der Volumenname und der Körper in dem dies sitzt in einer Meldung ausgegeben (Wobei bei vielen Körpern der Text wahrscheinlich für eine MsgBox zu lang ist )Code:Sub CATMain() Set oBodies = CATIA.ActiveDocument.Part.Bodies sTmp = "" ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Werkzeugwechsel und Maschine hinzufügen
DaiVied am 22.09.2011 um 10:14 Uhr (0)
Folgendes Makro habe ich geschrieben um einen Werkzeugwechsel und eine Maschine hinzuzufügenhier der Code:Code:Sub CATMain() Dim processDocument Dim PPR Dim process Dim clamping Dim resourceList Dim manufacturingProgram Dim toolChange Set processDocument = CATIA.ActiveDocument Set PPR = processDocument.PPRDocument Set process = PPR.processes.Item("Process") Set clamping = process.GetItem("Aufspannung.1") clamping.name = "standard_clamping" call clamping.CreateMachine(Mfg3AxisWithTableRotationMachin ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Position eines Objectes im Baum auslesen
ptit.tom am 15.04.2009 um 09:59 Uhr (0)
Nochmal hallo,Ich habe einige Änderungen gemacht. Jetzt liefert das Code den Pfad bis zum Part:Code:Sub CATMain() Dim oDoc As Document Dim oPart As Part Dim oObject As AnyObject Dim cSelection As Selection Dim Status As String Dim InputObjectType(0) Dim sPath As String Dim i As Integer Dim oParent As AnyObject Set oDoc = CATIA.ActiveDocument ### SELECT SOMETHING ### Set cSelection = oDoc.Selection cSelection.Clear InputObjectType(0) = "AnyObject" Status = cSelection.SelectElement2(Input ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Prüfen, ob Ansicht in Drawing vorhanden
n4426 am 14.04.2011 um 13:14 Uhr (0)
Hallo zusammen,ich bin gerade dabei ein VBA-Makro zu bastenl, welches mir den Pfad der Verlinkten Datei einer View im Drawing ausließt.Jetzt möchte ich vorm auslesen Prüfen, ob die Ansicht überhaubt auf dem aktuellem Blatt vorhanden ist.Code:Dim drawingDocument1 As DocumentSet drawingDocument1 = CATIA.ActiveDocumentDim drawingSheets1 As DrawingSheetsSet drawingSheets1 = drawingDocument1.SheetsDim drawingSheet1 As DrawingSheetSet drawingSheet1 = drawingSheets1.ActiveSheetSet drawingSheet1 = drawingSheets1.I ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Absoluter Link einer Ansicht (View) Objektverbindungen abfragen...
CatMike am 04.09.2008 um 11:34 Uhr (0)
Hallo,kann mir jemand erklären, warum die "GenerativeBehavior.Document"-Methode in meinem Skript nicht funktioniert?Ich bekomme den Fehler: "the method Document failed"Ich bedanke mich im Voraus.****************************** Dim oDrwDoc As DrawingDocument Set oDrwDoc= CATIA.ActiveDocument Retrieve the drawing documents sheets collection Dim oDrwSheets As drawingSheets Set oDrwSheets = oDrwDoc.Sheets Scan all the sheets of the Drawing document Dim CurrentSheet As drawingSheet For numsheet = 1 To oDrw ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : nach intersect prüfen
Jens Hansen am 19.10.2008 um 16:36 Uhr (0)
Hallo,so ohne weiteres wird es nicht gehen, da eine Intersection, die NICHT erstellt werden kann einen Fehler verurscht. Du wirst das INtersection-Object erzeugen müssen um sicher zu gehen. Zum Schluss kannst du dann das (fehlerhafte) Intersection-Objekt über eine Selection löschen.Vorgehensweise:On error resume nextCreate Intersection1(Linie_pinkt,Linie_gruen)Part.Updateif err.number == 0 then"Achtung ihre Lienien überscheiden sich,Programm Abbruch!"end ifSelection1.Add Intersection1Selection1.Deleteerr.c ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zuweisung von Products ändern
CAD-Erlerner am 09.03.2010 um 16:51 Uhr (0)
Hallo Zusammen!Ich würde mich freuen wenn ihr mir bei folgendem Problem helfen könntet:Mit einem VBA Makro möchte ich gerne Produkte in Produkte auf der selben Strukturbaumebene "verschieben".Was in CATIA per Drag & Drop funktioniert habe ich in meinem Makro bisher nicht geschafft.Hier der Code mit dem es nicht funktioniert:Code:zu verschiebendes Element zwischenspeichern:Dim Zwischenspeicher As ProductSet Zwischenspeicher = products1.Item(Name)Element dem Product in der selben Ebene hinzufügen:Dim MK_Inha ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Keinen Zugriff auf UserRefProperties
DanielFr. am 03.08.2009 um 21:26 Uhr (0)
Hallo Christoph,Zitat aus der V5Automation.chmReturns the collection object containing the product properties. All the user defined properties that are created in the reference product might be accessed through that collection. Only available on reference products. Das heißt du musst dir das ReferenceProduct Objekt instanzieren. Dort sind die UserRefProperties für Parts und Unterprodukte eines Rootprodukts verfügbarHier mal ein Beispielcode:Code:Sub CATMain() Dim oDoc As Document Dim oRoot As Product Di ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Einzelne Products aus dem Strukturbaum löschen
xam0560 am 19.05.2014 um 14:37 Uhr (1)
Mhh das Makro wird fast bzw. keiner haben.Da musst du schon selbst ran.Lass per For Schleife deinen Baum durchlaufen und sobald er auf ein Product stößt das eben eine Zahl oder was du eben willst am Anfang stehen hat, soll er in ein zweite For schleife gehen und eben alle gefundenen Elemente in dein HauptProdukt einbauen.next i und Abflug.Dannach Produkt löschen und TADA du hast das was du willst.ACHTUNG: Wenn du ein Produkt hast, das ebenfalls eine Produkt hat, das auch zu dieser Kategorie gehört wird es ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punkte suchen und in Array schreiben
Physimathi am 12.04.2007 um 12:03 Uhr (0)
Hallo,wie es eben so ist, mit dem Tun kommen die Fragen.Mein Skript:Sub CATMain()Set oSelection = CATIA.ActiveDocument.SelectionDim Auswahl(0)oSelection.ClearAuswahl(0) = "Point2D"MsgBox ("Selektieren Sie bitte einen Punkt")Status = oSelection.SelectElement2(Auswahl, "Select", False)Set oSelectedElement = oSelection.Item(1).Value Nimm erste SelektionMsgBox ("Punkt in Selection")End SubNun meine Frage:Im Baum kann ich einen Punkt anklicken, welcher dann in die Selection geht. Doch gehe ich auf den Punkt im ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Publication Referenzieren
Bopkes am 15.07.2009 um 10:00 Uhr (0)
Hierstmal DANKE für deine Erklärung!Habe jetzt mal rumprobiert, und folgendes getan:-nach der Publication gesucht uns sie gefunden ("PartBody")-Valuation der Publication abgefragt ( ich denke mal das ist das was du mit Referenz auslesen meinst???), und somit den Kompletten Namen erhalten:"Product1/Referenz_statischer_Lastfall.1/!PartBody"- Daraus eine Referenz für mein weiteres Vorgehen erstellen mit CreatRefernceFromName ist dann leider fehlgeschlagen mit der Meldung "Object doesn`t support this property ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mal wieder ein Brp Problem
X-O am 12.10.2009 um 22:47 Uhr (0)
Hallo zusammen, ich möchte einen Endpunkt einer vorher erzeugten Linie als referenz benutzen. Der Recorder zeichnet folgende Zeile auf:Set reference82 = part1.CreateReferenceFromBRepName("BorderFVertex: (BEdge: (Brp: (Sketch.6;16);None: (Limits1: () ;Limits2: ();+1);Cf11: ()) ;WithPermanentBody;WithoutBuildError;WithSelectingFeatureSupport;MFBRepVersion_CXR15)", sketch2)Probleme macht mir das fett makierte. Wenn das Makro in einem anderen Part läuft (was fast komplett identisch ist), muss das Sketch.4 heiß ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Seltsame Probleme beim Start eines externen Programms mit Paramterübergabe aus Catia
joerka am 26.05.2011 um 20:54 Uhr (5)
Hey Leute,ich hab hier ein sehr spezielles Problem, habe zumindest bei meiner Suche keine anderen damit gefunden… Und zwar programmiere ich gerade an einem CatVBA, das u.a. auch eine externe (von mir geschriebene) .exe mit Parametern aufrufen soll, also z.B. „C: est.exe 0 0 0 15 15 15 …“. Mein Programm hat seine Ausgabe einfach über Kommandozeile, es öffnet sich also immer das Kommandozeilenfenster (wird ab jetzt einfach schwarzes Fenster genannt ) und meldet entweder, dass er keine Parameter hat (wenn oh ...
|
| In das Form CATIA V5 Programmierung wechseln |
