|
CATIA V5 Programmierung : Linienlänge und Flächen mit makro auslesen
B Hossbach am 23.04.2008 um 14:00 Uhr (0)
Ich will es bloß in Excel reinschreiben, deswegen der Bezug auf die Excel - zelle. Der Zugriff auf die Objekte scheint doch etwas komplizierter zu sein. Ich weiß nicht, wie ich vom product auf das Element in dem GeoSet komme.CATIA.ActiveDocument.Product. ?.?.? myHybridbody.HybridShapes.Countdanke für Deine Hilfe, Jens. Aber ich denke, dass ich da noch einige Defizite in Bezug auf VBA habe. Werde mich noch mal mit den Grundlagen beschäftigen und erstmal das Buch durcharbeiten. GrußBjörn
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linienlänge und Flächen mit makro auslesen
B Hossbach am 23.04.2008 um 16:45 Uhr (0)
Noch eine Frage hab ichGibt es für CATIA Makros irgendwo eine API?
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linienlänge und Flächen mit makro auslesen
B Hossbach am 25.04.2008 um 16:23 Uhr (0)
P.S.Sowas wie ne API gibts hier: http://www.kxcad.net/catia/B17doc/English/online/interfaces/interface_igessettingatt.htm
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linienlänge und Flächen mit makro auslesen
B Hossbach am 25.04.2008 um 16:22 Uhr (0)
So. Jetzt hab ichs:-------------------------------------------------------------------------------------------------------Linienlaenge messenFunction LinienLaenge(Param) Dim TheSPAWorkbench, TheMeasurable, Laenge Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench") Set TheMeasurable = TheSPAWorkbench.GetMeasurable(Param) Laenge = TheMeasurable.Length LinienLaenge = LaengeEnd Function-------------------------------------------------------------------------------------------------------Fl ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Set auslesen
B Hossbach am 28.04.2008 um 13:10 Uhr (0)
Hallo Forum. Ich möchte Werte aus mit Formeln belegten Parametern auslesen, die sich in mehreren Parameter Sets befinden. (siehe Screenshot)Funktioniert mit dem folgenden Skript auch super:Sub CATMain()Parameter aus Baum auslesen Dim HPara Verweis auf Hauptpfad Set HPara = CATIA.ActiveDocument.Part.Parameters Dim ADim Set ADim = HPara.Item("Length.3") MsgBox (ADim.Value) MsgBox (ADim.Name) End SubNur leider bekomme ich den Value und Name des Parameters "Length.3" nur, wenn ich ihn dire ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Set auslesen
B Hossbach am 29.04.2008 um 08:58 Uhr (0)
Sers Lusilnie,das war es fast...Über:Set Part1 = CATIA.ActiveDocument.Part Set Param1 = Part1.Parameters.RootParameterSet.DirectParameters Set Param2 = Param1.Item(1)komme ich auf den ersten Parameter.Leider schaffe ich es nicht, in den 2. Ordner (Parameters.1) rein. :-(Bei Param1.Count kommt auch nur "1" raus. Als wenn der zweite Unterordner gar nicht da wäre... grußBjörn
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Set auslesen
B Hossbach am 29.04.2008 um 10:13 Uhr (0)
So. Hier die Lösung:(Leider nur statisch bis auf die zweite Ebene....)Sub CATMain ()Dim HParaSet HPara = CATIA.ActiveDocument.Part.Parameters.RootParameterSet.ParameterSetsFuncPara HPara, ExcelZeileEnd Sub Function FuncPara(PfadPara, ExcelZeile)For i = 1 to PfadPara.count Set Param11 = PfadPara.Item(i).DirectParameters For a = 1 to Param11.Count Set Param111 = Param11.Item(a) AusgabeExcel 1, Excelzeile, Param111.Name Excelzeile = ExcelZeile + 1 NextNext End Function
|
In das Form CATIA V5 Programmierung wechseln |