|
CATIA V5 Programmierung : Automatische Erzeugung von Baugruppen-CGRs
bgrittmann am 15.07.2011 um 17:54 Uhr (0)
ServusZu 1.:Versuch mal ObjType = TypeName(CATIA.Activedocument)Zu 2.:Versuch mal:Set partDocument1 = CATIA.Documents.Item("3432A75A39D531603432A75A39D76F06VPMENV DOCCAD PLOC")oderSet partDocument1 = CATIA.Documents.Item("3432A75A39D531603432A75A39D76F06VPMENV DOCCAD PLOC.CATPart")GrußBerndPS: Was machst du wenn das "Skelettpart" mal anders heißt?------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Automatische Erzeugung von Baugruppen-CGRs
bgrittmann am 16.07.2011 um 00:12 Uhr (0)
ServusAFAIK kann man zwischen den Fenstern zB über:CATIA.Windows.item(2).ActivatebzwCATIA.Windows.item("Part1.CATPart").Activatewechseln. (siehe auch Doku).GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Automatische Erzeugung von Baugruppen-CGRs
jdahm am 14.07.2011 um 19:54 Uhr (0)
Mehrere Baugruppen sollen in ihrer Lage zueinander über Parameter ausgelenkt werden.Dazu habe ich ein Steuer-Part, das ein Achsensystem mit Hilfe einer Konstruktions-Tabelle auslenkt.Die zu positionierenden Baugruppen sind an das Achsensystem gekoppelt.Für jeden Auslenkungsfall der Tabelle soll ein CGR der Gesamt-Baugruppe automatisch erzeugt werden.Nach der Parameter-Änderung im Steuer-Part müßte also die oberste Baugruppe aktiviert, aktualisiert und als CGR gespeichert werden.Denyo hatte mir vor einiger ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Automatische Erzeugung von Baugruppen-CGRs
jdahm am 18.07.2011 um 18:59 Uhr (0)
Bisher hatte ich den Pfad, in dem die CGRs abgelegt werden sollen, im script vorgegeben.Ich will es dem User überlassen, einen Pfad selbst zu wählen, weiß aber nicht, wie das script für die entsprechende Dialogbox oder UserForm aussehen muß.PS:Kann mir jemand vernünftige Literatur zur CATIA-Programmierung empfehlen?Die interne VB-Hilfe hätten sie auch in chinesisch schreiben können.------------------GrußJürgen
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Automatische Erzeugung von Baugruppen-CGRs
bgrittmann am 18.07.2011 um 19:16 Uhr (0)
ServusAls Literatur gibt es:- CATIA V5 - Makroprogrammierung mit Visual Basic Script von Dieter R. Ziethen- Kochbuch CATIA V5 automatisieren - Vom Powercopy bis zur C sharp-Programmierung von Jens Hansensowie genügend allgemein zu Bücher zu VB (mit Sicherheit kein Fehler als Grundlage).Anbei ein Beispiel wie man eine Ordern selektieren kann:Code:set ShellApp=CreateObject("Shell.Application") erzeuge ein neues Objekt "Shell Application" set FolBrowser=ShellApp.BrowseForFolder(0,"Bitte wählen Sie ein Input-V ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : auf koordinaten zugreifen!!!!
sawah am 19.07.2011 um 09:49 Uhr (0)
Hallo zusammen,ich habe eine Frage und zwar ich hab ein Koordinatensystem erzeugt wo Die Axe auch mit Koordinaten definiert sind, ich will auf diese Koordinaten zugreifen und mit Excel ändern, ist das möglich? ich hab das hier versucht, bekomme aber eine Fehlermeldung!!?Catia.ActiveDocument.part.axissystems.item(1).XAxisDirection.X.valueGruß Sawah
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : auf koordinaten zugreifen!!!!
JuPaV am 19.07.2011 um 10:28 Uhr (0)
Hallo Du kannst AxisSystem messen und Koordinaten auslesen.Hier ist ein Beispiel:Code:Sub CATMain()Set oPart = CATIA.ActiveDocument.PartSet ASys = oPart.AxisSystems.Item("Axis System.2")Set oRef = oPart.CreateReferenceFromObject(ASys)Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")Set TheMeasurable = TheSPAWorkbench.GetMeasurable(oRef)Dim Components(11)TheMeasurable.GetAxisSystem ComponentsEnd Sub------------------Mit freundlichen Grüßen,JuPaV
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : auf koordinaten zugreifen!!!!
sawah am 19.07.2011 um 14:26 Uhr (0)
Hallo,ich habe das probiert und funktioniert schon, aber bekomme werte was mit Catia net stimmen!!!weißt jemand woran das liegen kann???Code:Sub CATMain()Set oPart = CATIA.ActiveDocument.PartSet ASys = oPart.AxisSystems.Item("KOS_2")Set oRef = oPart.CreateReferenceFromObject(ASys)Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")Set TheMeasurable = TheSPAWorkbench.GetMeasurable(oRef)Dim Components(11)TheMeasurable.GetAxisSystem ComponentsMsgBox Components(0) & vbLf & Components(1 ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übergeordnetes Produkt ermitteln
HoBLila am 19.07.2011 um 16:08 Uhr (0)
Hallo Tiberius,ich habe die Frage sicher falsch verstanden, aber hier mein Code.Code:Option ExplicitSub CATMain() Dim prodWork As ProductStructureTypeLib.Product Dim selWork As INFITF.Selection Set selWork = CATIA.ActiveDocument.Selection Set prodWork = selWork.Item2(1).Value Call MsgBox(prodWork.Parent.Parent.Name)End SubAnalog dazu über das ReferenceProduct vom Part.------------------Mit freundlichen Grüßen,Henry Schneideralias LilaEs gibt einen ewigen Wettkampf zwischen der Natur und den Ing ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrical tolerance
JuPaV am 20.07.2011 um 14:25 Uhr (1)
Hallo Versuch so:Code:Sub test()Set oSheets = CATIA.ActiveDocument.SheetsSet oSheet = oSheets.Item("Sheet.1")Set oView = oSheet.Views.Item("Front view")Set myDimension = oView.Dimensions.Item("Dimension.2")Dim oTolType As LongDim oDisplayMode As LongDim oTolName As StringDim oUpTolS As StringDim oLowTolS As StringDim oUpTolD As DoubleDim oLowTolD As DoublemyDimension.GetTolerances oTolType, oTolName, oUpTolS, oLowTolS, oUpTolD, oLowTolD, oDisplayModeoUpTolD = -0.58oLowTolD = 0.2myDimension.SetTolerances o ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Funktion: Get CuttingElem() funktioniert nicht
BeneLack am 20.07.2011 um 14:00 Uhr (0)
Hallo zusammen,ich würde gerne die einzelnen Cutting Elements aus einem Split auslesen. Die Catia Hilfe bietet dafür die Funktion Get CuttingElem() an. Bei mir erscheint jedoch immer die Fehlermeldung "The method GetCutting Elem failed:Dim CUTTERS As ReferenceDim Element(2) As HybridShape- Element() wird weiter oben im Programm zugewiesenFor Y = 0 To 1 For o = 0 To Element(Y).GetNbCuttingElem - 1 MsgBox Element(Y).GetCuttingElem(o).DisplayName NextNextVilen Dank schon malGruß Benedikt
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Befehlsliste für Catia V5
jdahm am 21.07.2011 um 17:24 Uhr (1)
Um die V5Automation.chm zu verstehen, muß man wahrscheinlich eingefleischter Voll-Profi sein.- Für einen Anfänger wie mich ist das halbchinesisch. Zu 50% führt die integrierte Suchfunktion ins Nirvana.Wenn es eine Struktur in diesem Dokument gibt, dann ist diese aber nicht für unerfahrene Praktiker geeignet, die schnell eine Problemlösung suchen.Da lob ich mir die Office-Dokumentation. In der wird zumindest die Syntax halbwegs erklärt.Der einzige, für mich gangbare Weg, sind Suchen oder Anfragen im Forum u ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Tabelle aus einer View auf ein neues Sheet kopieren
piston am 22.07.2011 um 10:49 Uhr (0)
Hallo!Folgende Problemstellung:Ich möchte eine Tabelle aus einer Vorlagezeichnung in eine neue Zeichnung kopieren. Hier der Code den ich mittels Makrorekorder aufgenommen habe:Language="VBSCRIPT"Sub CATMain()Set drawingDocument1 = CATIA.ActiveDocumentSet drawingSheets1 = drawingDocument1.SheetsSet drawingSheet1 = drawingSheets1.Item("Aenderungstabellen_Test")drawingSheet1.Activate Set drawingDocument1 = CATIA.ActiveDocumentSet selection1 = drawingDocument1.Selectionselection1.Clear Set drawingViews1 = draw ...
|
| In das Form CATIA V5 Programmierung wechseln |
