|
CATIA V5 Programmierung : Geometrisches Set einfügen
denyo_1 am 10.02.2009 um 14:20 Uhr (0)
Hallo Beemer,das er das Set nochmal hinzufügt ist ja auch logisch. Du fügst ja erstmal ein Set ein und benennst es dann um. Da es in CATIA auf der Partebene möglich ist das zwei Sets die selben Namen habe bekommst du auch keinen Fehler und das Set wird nochmal in den selben Namen umbenannt. Um da Abhilfe zu schaffen brauchst du eine Abfrage ob das Set schon existiert. Falls ja soll er nichts machen falls neín soll er es hinzufügen. Schau dir mal den Code unten an.Code:Sub CATMain()Dim HB1 As HybridBodySet ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Anzahl der Blätter in Drawing ermitteln
schmidma am 11.02.2009 um 10:48 Uhr (0)
Hallo CAD.CD Gemeinde,Schuffte gerade an meinem ersten Catia-Makro, wobwei ich hier die Anzahl der Blätter in einer Drawing ermitteln möchte.Kann mir jemand helfen?
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Anzahl der Blätter in Drawing ermitteln
RSchulz am 11.02.2009 um 10:58 Uhr (0)
Hallo,versuchs mal damit...Dim DRW as DrawingDocumentDim DRWShts as DrawingSheetsDim Anzahl as IntegerSet DRW = CATIA.ActiveDocumentSet DRWShts = DRW.SheetsAnzahl = DRWShts.Count------------------MFGRick SchulzNettiquette (CAD.de)Konfuzius sprach: "Wer sich das Alte noch einmal vor Augen führt, um das Neue zu verstehen, der kann anderen ein Lehrer sein."
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Übergabe an Funktion macht Probleme
Tiberius am 11.02.2009 um 15:07 Uhr (0)
Hi,ich habe hier ein CATScript welches eine Function beinhaltet die Daten ausliest. Die Auswahl wird vorweg per Selektion getroffen.CATMain() Dim userSel Dim i Dim manuSetup Set userSel = CATIA.ActiveDocument.Selection For i = 1 To userSel.Count If userSel.Item(i).Type = "ManufacturingSetup" Then Set manuSetup = userSel.Item(i).Value Daten_auslesen ("A", manuSetup) End If NextEnd SubFunction Daten_auslesen (Parameter As String, Aufspannung as ManufacturingSetup) As String...End FunctionRufe ich die F ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : rechnet R16 intern anders als R19?
BigCheese am 09.02.2009 um 14:11 Uhr (0)
Hallo zusammen,ich habe zur Zeit das Vergnügen die R19 zu testen.Dabei messe ich über folgendes Makro das Volumen im PartBody:Code:Sub CATMain() Dim oActiveDocument Set oActiveDocument = CATIA.ActiveDocument Dim oVolumenPart Set oVolumenPart = oActiveDocument.Part Aktuelles Volumen ausrechnen Dim oVolumenBody As Body Set oVolumenBody = oVolumenPart.MainBody dVolumen = MeasureVolume(oVolumenBody, oVolumenPart) MsgBox "gemessenes Volumen beträgt " & dVolumen End Sub ----------------- ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : rechnet R16 intern anders als R19?
denyo_1 am 09.02.2009 um 15:12 Uhr (0)
Hallo,hab gerade kein CATIA am laufen aber kannst du nicht die oVol Variable als Volumen deklarieren und anschließend irgendwie die Einheit rausfischen? Dann könntest du die ganze Misere umgehen------------------MFG DanielDie KATJA ist halt doch nur ne zickige Französin
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA V5 Programmierung
dennisw am 11.02.2009 um 22:03 Uhr (0)
Hallo Kollegien und Kollegen,ich bin ein absoluter Anfänger mit Programmierung. Ich möchte einen Skript für Schweißpunkte bzw. Schweißwolke programmieren. So was ähnlich habe ich schon gesehen. Das Makro soll in einem Datensatz (Part) automatisch die Punkte suchen und den Kugel mit D=3mm erstellen.Man kann aber auch diese Punkte und die Kugelchen mit ZX-Ebene spiegeln. Falls jemand eine Ahnung hat, wie das programmieren kann werde ich mich für den Vorschlag freuen.------------------MfGDennis
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrisches Set einfügen
Beemer328 am 10.02.2009 um 10:08 Uhr (0)
Hallo,ich möchte mittels Makro einem vorhandenen geometrischen Set ein weiteres hinzufügen. Dazu habe ich folgendes Makro:Sub CATMain()Dim HB1 As HybridBodySet HB1 = CATIA.ActiveDocument.Part.Hybridbodies.Item ("Vorhanden")Dim HKoerper As HybridBodiesSet HKoerper = HB1.HybridbodiesDim HB2 As HybridBodySet HB2 = HKoerper.Add HB2.Name = "NeuesSet"End SubWenn ich das Makro nochmal ausführe, wird natürlich das Set nochmal eingefügt. Was muss noch dazu, dass das Set dann nicht nochmal eingefügt wird?----------- ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrisches Set einfügen
Beemer328 am 10.02.2009 um 10:08 Uhr (0)
Hallo,ich möchte mittels Makro einem vorhandenen geometrischen Set ein weiteres hinzufügen. Dazu habe ich folgendes Makro:Sub CATMain()Dim HB1 As HybridBodySet HB1 = CATIA.ActiveDocument.Part.Hybridbodies.Item ("Vorhanden")Dim HKoerper As HybridBodiesSet HKoerper = HB1.HybridbodiesDim HB2 As HybridBodySet HB2 = HKoerper.Add HB2.Name = "NeuesSet"End SubWenn ich das Makro nochmal ausführe, wird natürlich das Set nochmal eingefügt. Was muss noch dazu, dass das Set dann nicht nochmal eingefügt wird?----------- ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrisches Set einfügen
denyo_1 am 10.02.2009 um 14:20 Uhr (0)
Hallo Beemer,das er das Set nochmal hinzufügt ist ja auch logisch. Du fügst ja erstmal ein Set ein und benennst es dann um. Da es in CATIA auf der Partebene möglich ist das zwei Sets die selben Namen habe bekommst du auch keinen Fehler und das Set wird nochmal in den selben Namen umbenannt. Um da Abhilfe zu schaffen brauchst du eine Abfrage ob das Set schon existiert. Falls ja soll er nichts machen falls neín soll er es hinzufügen. Schau dir mal den Code unten an.Code:Sub CATMain()Dim HB1 As HybridBodySet ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrisches Set einfügen
Beemer328 am 10.02.2009 um 15:14 Uhr (0)
Achso Keine Angst, Rechtschreibfehler interessieren mich überhaupt nicht.Naja, es passiert überhaupt nichts. Auch keine Fehlermeldung. Es fügt auch kein GeoSet ein. (auch nicht, wenn es noch nicht mit dem Namen existiert, was ja der Sinn sein soll). Hmmm. 2. Idee: Ich habe in dem Forum hier mal etwas gefunden, das zwar funktioniert, aber nur in der ersten Ebene des Strukturbaumes. Es ist mir noch nicht gelungen, es für Untersets umzubauen. Vielleicht habt ihr eine Idee, was ich verändern muss, damit ich m ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrisches Set einfügen
rattlesnake am 11.02.2009 um 08:37 Uhr (0)
ich hab da mal Funktionen zu geschrieben:Code:Public Function getHybridBody(nameOfHybridBody As String, Optional parent As Object, Optional createIfNotExists As Boolean) Dim userSel As selection Dim newHybridBody As HybridBody search for hybrid body Set userSel = CATIA.activeDocument.selection userSel.Clear userSel.Search "CATPrtSearch.OpenBodyFeature.Name=" & nameOfHybridBody & "*,all" If userSel.Count 0 Then Set newHybridBody = userSel.Item(1).value ElseIf createIfNotExists Then Set newH ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA V5 Programmierung
Lusilnie am 12.02.2009 um 01:24 Uhr (0)
Hallo dennisw,willkommen im Forum!Den Vorschlag kann ich schnell liefern, programmieren musst Du aber selber. Da kann ich nur helfen!Also:1.) alle Punkte suchen und selektieren, sprich in eine "Selektion" suchen2.) um alle Elemente (Punkte) der Selektion eine "Sphere" (Kugelfläche - GSD-Workbench) mit gewünschten Radius erstellen3.) Spiegelung? - Punkt-Koordinaten auslesen, Y-Wert invertieren, Punkt mit neuen Koordinaten erstellen, Kugelfläche erzeugenIch hoffe, dies reicht Dir erst mal als Konzept, nun mu ...
|
| In das Form CATIA V5 Programmierung wechseln |
