|
CATIA V5 Programmierung : Explosionsplan
denyo_1 am 07.04.2009 um 08:57 Uhr (0)
Hallo,wie du schon sagtest ist die interne Explosionsfunktion aus CATIA in den wenigsten Fällen zu gebrauchen. D.h. IMHO werden die meisten Explosionszeichnungen folgendermaßen erstellt:1. Im 3D eine Szene erstellen2. Hier mit dem Kompass die Teile auf die gewünschte Position bringen3. Eine Kamera einfügen (Sichtpunkt für ISO-Ansicht)4. ZeichnungsableitungHier kann der Anwender aber selber bestimmen und muss direkt auf die verschiedenen Anforderungen im Modell eingehen (beim Erstellen der Explosion im 3D). ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : UUID erzeugen
HoBLila am 27.07.2012 um 14:20 Uhr (0)
Hallo Daniel,genau daran arbeite ich ja schon. :-)Nur schreibe ich halt eine eigentlich recht einfache Anwendung, welche Informationen aus dem CATIA extrahiert und für nachgelagerte Prozesse in XML überführt.Natürlich alles mit schön viel Schemadatei und drumherum.Rein Hypothetisch alles nicht so komplex, nur muss das Skript plattformunabhängig und in wenigen Wochen fertig sein wird (ich habe noch 3 aber auch andere Themen). :-)Nun habe ich dafür eine eigene Dictionary-Klasse schreiben müssen und schreibe ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mit DisplayName auf Product/Instanz zugreifen
Lionel Hutz am 16.09.2020 um 09:17 Uhr (1)
Ich probiere gerade auf eine Instanz zuzugreifen, die mit einem Constraint verbunden ist.Bisher bin ich vom Constraint bis zum DisplayName gekommen; jetzt möchte ich auf die Instanz zugreifen um abzugleichen, ob das Bauteil selektiert ist.Code:Language="VBSCRIPT"Sub CATMain()Set oDoc = CATIA.ActiveDocumentSet oProduct = oDoc.ProductSet oConstraints = oDoc.Product.Connections("CATIAConstraints")Set oConstraint = oConstraints.Item(1)Set oConstraintElement1 = oConstraint.GetConstraintElement(1)MsgBox "Display ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : SetViewName funktioniert nicht
WilliGo am 21.01.2009 um 13:12 Uhr (0)
Hallo Zusammen,soweit habe ich es schon geschafft. Zeichnung aktivieren bis hin zur View. Jetzt möchte ich diese aber noch mit einem Neuen Namen versehen aber erhalte beim Einsatz von "SetViewName" immer einer Fehlermeldung das die Metode nicht vorhanden ist.Hier meine Code:Dim drawingDocument1 As DocumentSet drawingDocument1 = CATIA.ActiveDocumentDim drawingSheets1 As DrawingSheetsSet drawingSheets1 = drawingDocument1.SheetsDim drawingSheet1 As DrawingSheetSet drawingSheet1 = drawingSheets1.Item("Details" ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : verschobenes Part im Podukt
hklein06 am 11.04.2006 um 08:04 Uhr (0)
Hallo Crash,die Funktion "Convert CATProduct to CATPart" war in den alten CATIA Versionen ein Makro bzw. ein CAA. Im Gunde genommen hat dieses Makro alle Teile in den Design Mode geholt, ein Copy gemacht und alles in einem Part eingefügt.Für einfache Aufgaben läßt sich das sicher problemlos nachprogrammieren und automatisieren. Bei großen Umfängen hat diese Vorgehensweise erhebliche Probleme (Design Mode).Eleganter wäre das Auslesen der Part-Product Matrix und eine Umrechnung auf die Koordinaten des Parts. ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ebenen in Makro umbenennen und löschen
A.H.N. am 14.01.2003 um 21:41 Uhr (0)
Hallo Steffen, und vielen Dank. Das umbenennen hat wundedrbar geklappt, nur mit dem löschen, das bekomme ich nicht auf die Reihe. Ich erzeuge mit Dim hybridBodie1 as HybridBodie set hybridBodie1 =hybridBodie1.Add() hybridBodie1.Name = "Referenz" einen geöffneten Körper mit dem Namen Referenz. Darin erzeuge ich mit Dim Ebene1 as HybridShapePlaneOffset Set Ebene1=hybridShapeFactory1.AddNewPlaneOffset(Reference1, Offset) hybridBody1.AppendHybridShape Ebene1 Ebene1.Name = "Ref-X" nacheinander 4 Ebenen. ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Makro umbenennen InstanceName
Langer11 am 31.03.2017 um 12:14 Uhr (1)
Hallo,ich bins mal wieder und hab ein Problem in VBA.Habe versucht ein Makro zu schreiben, welches den InstanzeName umbenennt. Hierfür gibt es ein Texteingabefenster, in das der Test, der ersetzt werden soll eingegeben wird Eingabe zB. "XXXX", dann erscheint ein weiteres Eingabefenster in der der neue Text eingegeben wird (Bsp.Eingabe: "YYYY")und nun soll bei allen InstanceName eines Produkts XXXX mit YYYY ersetzt werden. Ich habe das gleiche Makro zum Umbenenne der PartNumber geschrieben, dort funktionier ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Script für Boolsche Operationen
bgrittmann am 28.04.2022 um 14:52 Uhr (1)
Servus JörnWillkommen im Forum.Die Methoden die du suchst sind AddNewAssemble bzw AddNewAdd.Hier ein Beisiel (aus eine Makroaufzeichnung entstanden):Code:Sub CATMain()Dim oPartDocument As DocumentSet oPartDocument = CATIA.ActiveDocumentDim oPart As PartSet oPart = oPartDocument.PartDim oBodies As BodiesSet oBodies = oPart.BodiesDim oMainBody As BodySet oMainBody = oPart.MainBodyoPart.InWorkObject = oMainBodyDim oShapeFactory As FactorySet oShapeFactory = oPart.ShapeFactoryDim oBody As BodySet oBody = oBodi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Aktuelle Sheet einer Drawing ermitteln
DanielFr. am 26.05.2009 um 06:14 Uhr (0)
Zitat:Original erstellt von CEROG:Du schreibst deinen Code in VBA und läßt ihn als CATVBS laufen......und VBS deklariert sich die Variabkentypen selber. Man brauchst deshalb keine DIM Anweisungen.Mit diesem Code sollte deine CATVbs auch laufen:Code:Language="VBSCRIPT"Sub CATMain() Dim oDoc As DrawingDocument (KOMPLETTE Zeile auskommentieren oder löschen!) Dim oSheets As DrawingSheets (KOMPLETTE Zeile auskommentieren oder löschen!) Dim oSheet As DrawingSheet (KOMPLETTE Zeile auskommentieren oder löschen!)S ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro für Achsensystem einfügen
DocMurphy am 30.07.2009 um 13:45 Uhr (0)
Das ist bis jetzt mein Code: (zusammengebastelt aus verschiedenen Codeschnipseln des Forums)__________________________________________________________________________________________Language="VBSCRIPT"Sub CATMain() Set oRoot = Catia.ActiveDocument Set oProd = oRoot.Product Set oProducts = oRoot.Product.Products SUB_CHECKAXIS oProductsEnd SubSub SUB_CHECKAXIS(oProducts) For i = 1 To oProducts.Count If TypeName(oProducts.Item(n).ReferenceProduct.Parent) = "PartDocument" Then If oProducts.Item(n).GetAxisSy ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bauteile in Gruppen zuweisen
PetraPetra am 25.06.2014 um 13:37 Uhr (1)
Hallo bgrittmann,das ging ja fix. Danke schonmal, der Code group1.name funktioniert wunderbar. wie kann ich denn mein Bauteil selektieren? ich würde das instinktiv so lösen:------------------------------------------Language="VBSCRIPT"Sub CATMain()Set productDocument1 = CATIA.ActiveDocumentSet product1 = productDocument1.Part1Set groups1 = product1.GetTechnologicalObject("Groups")Set group1 = groups1.AddFromSel()Set product2 = productDocument1.Part2Set groups2 = product2.GetTechnologicalObject("Groups")Set ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Publications kopieren
AlfaRomeo75 am 24.06.2008 um 11:36 Uhr (0)
Hallo,folgender Aufbau:In einem Produkt sind mehrere Parts eingebunden in denen Elemente (Flächen, Kurven, etc.) veröffentlicht sind. Diese Elemente möchte ich in ein weiteres in das Produkt eingebundenes Part kopieren(mit Link!).Es funktioniert soweit, das ich die Publications finde und auch über Publ.Valuation das publizierte Element finde. Es scheitert im Prinzip nur an der Kopierfunktion. Dort bekomme ich immer die Meldung:Error Copying Data: "Selected element(s) not allowed for this operation".Hier ma ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : polyline aus vorhandenen punkten erstellen
MaxZ am 15.07.2005 um 09:53 Uhr (0)
ah, okay! dann versuch: Language="VBSCRIPT" Sub CATMain() Set partDocument1 = CATIA.ActiveDocument Set part1 = partDocument1.Part Set parameters1 = part1.Parameters Set intParam1 = parameters1.Item("Anzahl_der_Punkte_br") num_points = intParam1.Value Set hybridShapeFactory1 = part1.HybridShapeFactory Set hybridShapePolyline1 = hybridShapeFactory1.AddNewPolyline() Set hybridBodies1 = part1.HybridBodies Set hybridBody1 = hybridBodies1.Item("Beruehrpunkte_bonnet_rear") Set hybridShapes1 = ...
|
| In das Form CATIA V5 Programmierung wechseln |
