|
CATIA V5 Programmierung : Partnumber auslesen, Part abspeichern
prosper am 31.01.2005 um 20:05 Uhr (0)
Hi, das ist natürlich per Macro möglich,habe es schon mehrmals gemacht. Den code kann ich jetzt nicht ganz genau schreiben, da ich momentan kein V5 zu verfügung habe. Es ist aber notwendig im Designmode zu arbeiten, damit die andere Teile alle Informationnen mit kriegen. Aber das gibt z.B. sowas: set oprod = CATIA.ActiveDocument.product.product.item(2) sprodname = oprod.PartNumber oprod.referenceproduct.parent.saveas sprodname & .CATProduct das alte Produkt kannst du entweder per macro oder per Hand lösc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bohrung per VBA einfügen
prosper am 26.04.2005 um 19:15 Uhr (0)
Hallo, vielleicht kann dir sowas weiterhelfen: Sub CATMain() Set osel = CATIA.ActiveDocument.Selection osel.Clear Dim afilter(0) afilter(0) = Face Set partDocument1 = CATIA.ActiveDocument Set part1 = partDocument1.Part Set shapeFactory1 = part1.ShapeFactory sstatus = osel.SelectElement(afilter, Select a Face , False) Set oref = osel.Item(1).Reference osel.EndSelectElement Set hole1 = shapeFactory1.AddNewHoleFromPoint(0, 0, 20, oref, 10) hole1.Type = catSimpleHole hole1.AnchorMode = catExtremPointHoleAnc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Befehl per Makro aufrufen?
prosper am 26.04.2005 um 19:32 Uhr (0)
Hallo, Catrin hat allerdings recht. Du kannst immer noch mit CATIA.StartCommand() probieren MfG Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Dateipfad auslesen
prosper am 27.04.2005 um 19:58 Uhr (0)
Hallo, falls nur das Part offen ist kannst du den Pfad auslesen. mit .ReferenceProduct.Parent.FullName Habe kein CATIA zu verfügung aber sowas sollte funktionnieren (falls dein CATPart dein aktives Dokument ist): set otmp = CATIA.ActiveDocument.Part Do set otmp = otmp.Parent Loop until TypeName(otmp) = PartDocument spfad = otmp.fullName Das kannst du aber im VB-Editor viel einfacher raus finden. Gruss Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Objekt einfügen
prosper am 29.04.2005 um 19:03 Uhr (0)
Hallo, probier doch mal sowas: Dim spart(0) spart(0) = c: mpPart.CATPart CATIA.ActiveDocument.Product.Products.AddComponentsFromFiles spart, All vielleicht... Gruss Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Objekt einfügen
prosper am 02.05.2005 um 18:53 Uhr (0)
Hallo, ich habe es nochmal unter R12 und R14 probiert, und bei funktionniert es. Sub test() Dim spart(0) spart(0) = Sub test() Dim spart(0) spart(0) = C:CADModelle est.CATPart CATIA.ActiveDocument.Product.Products.AddComponentsFromFiles spart, All End Sub Die Datei C:CADModelle est.CATPart muss da sein und ein CATProduct muss offen sein. Gruss Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punkte finden und Abstände messen
prosper am 02.05.2005 um 19:13 Uhr (0)
Hallo, vielleicht kann sowas weiterhelfen: Sub CATMain() Set osel = CATIA.ActiveDocument.Selection osel.Clear Dim afilter(0) afilter(0) = Point Status = osel.SelectElement(afilter, Select a point. , False) Set opoint = osel.Item(1).Value osel.EndSelectElement Dim acoord_in_part(2) opoint.GetCoordinates acoord_in_part Dim acoord_part_in_product(11) Dim acoord_product_in_sub_product(11) Dim atmp(2) Dim acoord_in_product(2) osel.Clear osel.Add opoint Set opart_product = osel.FindObject( CATIAProduct ) opar ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter und objekt löschen
prosper am 03.05.2005 um 19:03 Uhr (0)
Hallo, probier doch sowas, vielleicht funktionniert es: In diesem beispiel sagen wir, dass du ein Part offen hast in dem sich zwei Bodies (b1 und b2) befinden die du löschen möchtest. Geht natürlich mit Parameters usw genau so. Objekte in die Selection packen und Selection löschen. Sub abc() dim oobjects(1) set oobjects(0) = Catia.activedocument.part.bodies.item( b1 ) set oobjects(1) = Catia.activedocument.part.bodies.item( b2 ) set osel = CATIA.activedocument.selection osel.clear for i=0 to ubound(oobject ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Datei in Drawing einfügen
prosper am 16.06.2005 um 19:41 Uhr (0)
Sub CATMain() Set opic = CATIA.ActiveDocument.Sheets.ActiveSheet.Views.Item(1).Pictures Set onewpic = opic.Add( C:your_pic.bmp , 100, 100) End Sub Ein Drawing muss bereits offen sein
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CreateReferenceFromName
prosper am 18.07.2005 um 20:31 Uhr (0)
Hallo Picard, um eine Constraint im Kontext von deinem Unterprodukt zu generien musstest du con diesem Unterprodukt anfangen. Das heisst unterprod.referenceProduct.parent.product oder sowas. Es funktionniert sicher, weiss aber nichr mehr genau wie. Auf jeden Fall muss du den Unterprodukt als Reference haben (mit Referenceproduct) und nicht aus dem root (mit produt.products.item(xy) ) Kann dir das weiterhelfen???? Kannst auch versuchen das mit dem recorder zu machen. Ich glaube, dass er aber aufs document g ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CreateReferenceFromName
prosper am 18.07.2005 um 20:34 Uhr (0)
Es ist aber nicht notwendig das Unterprodukt ineu zu öffnen, das funktionniert im root. Catia muss wissen in welchem Produkt "sie" die constraint erzeugen soll, und das passiert direkt im product document
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Durchzählen von Körpern
prosper am 17.09.2005 um 16:08 Uhr (0)
Hallo, in diesem Beispiel muss ein Part offen sein.Sub CATMainset obodies = CATIA.AtciveDocument.Part.Bodiesanzahlkoerper = 10for i = 1 to anzahlkoerper set onewbody = obodies.Add() onewbody.Name = "Welle." & inextend SubReicht dir sowas?Chris
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA hat keine Kontrolle nach Makro lauf
prosper am 26.09.2005 um 20:26 Uhr (0)
Geht sowas nicht mit:If Status "Normal" thenExit SubEnd if????
|
| In das Form CATIA V5 Programmierung wechseln |
