|
CATIA V5 Programmierung : Neues Part als CATIA.ActiveDocument
AlfaRomeo75 am 19.08.2005 um 08:07 Uhr (0)
Hallo TomTom,vielen Dank für Deine Antwort! Mit welcher Catia-Version arbeitest Du? Bei mir (R12 SP9) läuft der Code nur dann, wenn bereits im CATIA ein Part geöffnet ist! Falls noch kein Part oder Product geöffnet ist (also ein leeres CATIA geöffnet ist), kommt immer die Fehlermeldung: "The method ActiveDocument failed".Desweiteren: Falls bereits ein Part geöffnet war und nicht die Fehlermeldung kommt läuft das Makro zwar durch, aber der erzeugte Körper "OpenBody1" wird nicht ausgeblendet.GrußThomas
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Länge einer Split-Kurve messen
AlfaRomeo75 am 04.07.2007 um 14:11 Uhr (0)
Hallo Alex,kann dein Problem gerade nicht ganz nachvollziehen! Mit welcher CATIA Version arbeitest Du?Bei mir kann ich mit folgendem Makro beliebige Kurven anwählen und messen!Probier mal so:Sub CATMain()Dim Status, oSelection, oSelectedElement, oDoc, oInstance, oRef, TheSPAWorkbench, TheMeasurable, LaengeDim InputObjectType(0) Set oDoc = CATIA.ActiveDocument.PartInputObjectType(0) = "HybridShape"Set oSelection = CATIA.ActiveDocument.SelectionoSelection.ClearStatus = oSelection.SelectElement2(InputObjectTy ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Neues Part als CATIA.ActiveDocument
AlfaRomeo75 am 18.08.2005 um 10:43 Uhr (0)
Hallo,hab da mal wieder ein Problem:Ich möchte ein neues Part erzeugen in dem bspw. ein geöffneter Körper erzeugt wird, welcher anschliessend ausgeblendet werden soll (Nur ein Beispiel!)Das Problem ist, daß bei der Erzeugung eines neuen Parts die Methode ActiveDocument fehlschlägt! (vermutlich weil ja noch kein Dokument aktiv ist!)?Also wie deklarieren ich ein Neues bei Makrostart noch nicht existierendes Part als CATIA.ActiveDocument?Wahrscheinlich eine Anfängerfrage aber bislang habe ich immer nur Makros ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Länge einer Split-Kurve messen
AlfaRomeo75 am 27.11.2007 um 10:36 Uhr (0)
Hallo Greenday,probiers mal so:Sub CATMain()Dim Status, oSelection, oSelectedElement, oDoc, oInstance, oRef, TheSPAWorkbench, TheMeasurable, LaengeSet oDoc = CATIA.ActiveDocument.PartSet oSelection = Catia.ActiveDocument.SelectionoSelection.Search "Name=Schnittkurve,all"Set oSelectedElement = oSelection.Item(1).ValueoSelection.ClearSet oRef = oDoc.CreateReferenceFromObject(oSelectedElement)Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")Set TheMeasurable = TheSPAWorkbench.GetMeasurab ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem mit Formelerstellung
AlfaRomeo75 am 17.01.2008 um 14:00 Uhr (0)
Hallo nochmal,ich möchte Eure kostbare Zeit natürlich nicht umsonst in Anspruch nehmen und habe nun doch noch die Lösung gefunden!!! Die möchte ich natürlich nicht geheimhalten!Nach einigen Versuchen "Try&Error" muss nun der Syntax wohl korrekt lauten:Set Formel = CATIA.ActiveDocument.Part.Relations.CreateFormula("Formel1","",CATIA.ActiveDocument.Part.Parameters.Item(mySet.Name&""&LineName&"End"),"length(`"&my.Name&""&myNear.Name&"` )")Vielen Dank dennoch an die, die sich vielleicht schon gedanken gemacht ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : .net Problem
AlfaRomeo75 am 13.01.2009 um 12:18 Uhr (0)
Zitat:Original erstellt von RSchulz:Hallo,da ich den Thread nicht kenne und ihn mir nicht durchlesen möchte, bitte ich darum dein Problem genauer zu beschreiben. Was genau möchtest du denn machen?OK, also ich möchte ein catvbs-Skript, welches sonst direkt unter Catia gestartet wird (Alt+F8...) über ein Externes .Net Programm starten.Also ich habe also im Visual Basic Express Edition 2008 eine Form auf der ich ein Button erzeuge! Sobald dieser Button gedrückt wird, soll das catvbs-Script ausgeführt werden. ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Makro zwischenzeitlich anhalten
AlfaRomeo75 am 19.08.2005 um 13:23 Uhr (15)
Hallo,habe das Problem meines letzten Beitrages "Neues Part als CATIA.ActiveDocument" eingrenzen können! Stehe aber nun schon wieder vor einem Neuen.Hier nochmal ein Code der das Problem verdeutlichen soll:Sub CATMain() Dim documents1 As Documents Set documents1 = CATIA.Documents Dim partDocument1 As Document Set partDocument1 = documents1.Add("Part") Dim part1 As Part Set part1 = partDocument1.Part Dim hybridBodies1 As HybridBodies Set hybridBodies1 = part1.HybridBodies Dim OpenBody ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : .net Problem
AlfaRomeo75 am 14.01.2009 um 12:05 Uhr (0)
Hallo,habe jetzt Daniels Weg nachvollziehen können und nun funzt es auch! Vielen Dank nochmal! Allerdings habe ich da noch eine Verständnisfrage zu der InfTypeLib.tlb.Wenn ich die aus einem Release 16 importiere, was passiert dann wenn ich ein R17-CATIA auf habe und dann das Programm wieder starte!Mir ist das noch nicht klar? Folgendes Szenario:Ich habe eine Startmaske im .Net erstellt mit der ich Scripte (catvbs) starten kann. Was passiert wenn ich dann Scripte in R17 über diese Maske starte (obwohl die ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro wird nicht korrekt beendet
AlfaRomeo75 am 07.03.2006 um 12:05 Uhr (0)
Hallo,habe mal wieder ein Problem:Ich öffne über ein Makro ein IGS-File in dem Kurven enthalten sind! Diese Kurven kopiere ich über eine Selektion in mein aktives Part(ohne Link).Soweit funktioniert auch alles, das Makro wird korrekt beendet! Nur merkwürdigerweise muss ich um dann in dem Part weiterarbeiten zu können immer auf irgendeine Funktion klicken und diese wieder beenden. Erst danach befindet sich CATIA wieder im normalen Status!Offensichtlich steckt CATIA immer noch in irgendeinem Dialog. (Die ang ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Skizze positionieren
AlfaRomeo75 am 11.07.2005 um 09:43 Uhr (0)
Hallo, möchte mittels eines Makros ein Achsensystem auswählen und auf dessen XY-Ebene ein Skizze erzeugt werden soll. Leider weiß ich nicht, wie ich die Reference auf die XY-Ebene eines gewählten Achsensystems bekomme? Vielleicht weiß es ja jemand von Euch? Hier mein Code: Sub CATMain() Dim aPart As Document.Part Set aPart = CATIA.ActiveDocument.Part Dim hb As HybridBodies Set hb = aPart.HybridBodies Dim oKoerper1 As HybridBody Set oKoerper1 = hb.Add() Dim Was(0) Was(0) = AxisSystem Dim UserSel as Selec ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Neues Part als CATIA.ActiveDocument
AlfaRomeo75 am 22.08.2005 um 07:44 Uhr (0)
Hallo TomTom,habe deinen Code kopiert und als CatScript gespeichert. Funktioniert leider nicht. Hier bekomme ich auch immer eine Fehlermeldung (siehe Bild). Und zwar bei beiden Varianten mit und ohne bereits geöffnetem Dokument.GrußThomas
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Referenzpunkt erzeugen
AlfaRomeo75 am 20.06.2005 um 09:26 Uhr (0)
Hallo, hab da mal ne Frage! Ich möchte einen Punkt in Bezug auf einen Referenzpunkt erzeugen(besser wäre in Bezug auf ein Achsensystem). Ich bekomme bei folgendem Code aber immer eine Fehlermeldung! Was mache ich falsch? (Fange gerade erst mit der Makroprogrammierung an!) Vielen Dank im Vorraus! Hier nun mein Code: Sub CATMain() Dim aPart As Document.Part Set aPart = CATIA.ActiveDocument.Part Dim HB as HybridBody Set HB = aPart.HybridBodies.Item ( Punkte ) Auswahl festlegen ------------------------ ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punkte auf einer Linie erzeugen
AlfaRomeo75 am 18.07.2005 um 14:41 Uhr (0)
Hallo, probier es mal hiermit: Voraussetzung ist, das ein Part geöffnet ist und ein offener Körper mit dem Namen "Punkte" existiert. Bei mir lief es fehlerfrei! Makro zum Erzeugen eines Punktes auf einer Linie/Kurve Sub CATMain () Dim partDocument1 As Document Set partDocument1 = CATIA.ActiveDocument Dim part1 As Part Set part1 = partDocument1.Part Dim hybridShapeFactory1 As Factory Set hybridShapeFactory1 = part1.HybridShapeFactory Dim HB as HybridBody Set HB = part1.HybridBo ...
|
| In das Form CATIA V5 Programmierung wechseln |
