|
CATIA V5 CAM : CAM Automatisieren
DaiVied am 19.09.2011 um 22:59 Uhr (0)
Ok ich verstehe was du meinst, aber darum dreht es sich nicht, das kann catia auch! Dankeschön aber trotzdem! Bei dem Projekt geht es um die Automatisierung der CAD/CAM Schnittstelle, sprich: Part öfnen, makro (oder ähnliches) starten, Code erhalten. Wie oben schon gesagt, Grundgeometrie, einspannung, Fräser, material usw. bleibt das selbe. Im nächsten Schritt kann man dann noch überlegen ob man eine externe GUI und mehr Funktionen einbaut. Aber das bleibt erst mal ganz hinten angestellt.Morgen gehts bei m ...
|
In das Form CATIA V5 CAM wechseln |
|
CATIA V5 CAM : CAM Automatisieren
DaiVied am 21.09.2011 um 10:04 Uhr (0)
Die Anweisung funktioniert, allerdings nur alleine!Hab ich ein Part davor geladen, so zeigt die Anweisung keine Wirkung mehr!Ich hab erst gedacht, das in VB die Anweisungen nicht wie in C Schritt für Schritt abgearbeitet werden, aber daran liegt es glaub ich auch nicht, da ich nun zwei Makros erstellt habe, eins um den Part zu laden und eines um in die Workbench zu wechseln."Manuell" kann ich ja zwischen Partdesign und verschiedenen Workbenches wechselnweis jemand Rat?Hier mal der Quelltext:Code:Sub CATMai ...
|
In das Form CATIA V5 CAM wechseln |
|
CATIA V5 CAM : CAM Automatisieren
DaiVied am 19.09.2011 um 12:07 Uhr (0)
Hallo alle zusammen,Ich habe den Auftrag erhalten über folgendes Thema zu recherchieren, finde aber leider keine Anhaltspunkte. Vll könnt ihr mir weiterhelfen:Die CAM schnittstelle von Catia soll automatisiert werden, soll heißen, man läd ein part, startet ein Makro und bekommt dann sogleich den CNC Code geliefert. Es handelt sich dabei um Kugellabyrinthe, die wir zu testzwecken fertigen. Das heißt, das Grundwerkstück besteht immer aus der gleichen rechteckigen PVC-Platte, Die Aufspannung ist immer die sel ...
|
In das Form CATIA V5 CAM wechseln |
 |
CATIA V5 CAM : CAM Automatisieren
DaiVied am 19.09.2011 um 13:59 Uhr (0)
Ich hab mal die Makroaufzeichnung drüber laufen lassen und bekomme beim ausführen die Fehlermeldung, die im angehängten Screenshot ersichtlich ist. der generierte VBS Code lautet:Code:Language="VBSCRIPT"Sub CATMain()Set specsAndGeomWindow1 = CATIA.ActiveWindowSet viewer3D1 = specsAndGeomWindow1.ActiveViewerSet viewpoint3D1 = viewer3D1.Viewpoint3DSet processDocument1 = CATIA.ActiveDocumentSet product1 = processDocument1.GetItem("T1 Schaftfräser D 10")Set parameters1 = product1.ParametersSet product2 = proce ...
|
In das Form CATIA V5 CAM wechseln |
|
CATIA V5 CAM : CAM Automatisieren
DaiVied am 20.09.2011 um 14:47 Uhr (0)
Und hier kommt auch schon die erste Frage:mit: CATIA.StartWorkbench ("Assembly")kann ich wunderbar ins Assembly Design wechselnmit: CATIA.StartWorkbench ("PrimaticMachining") wollte ich versuchen in die entsprechende workbench zu wechseln, da zeigt das ganze aber keine Wirkung! Weis jemand den richtigen Befehl?
|
In das Form CATIA V5 CAM wechseln |
|
CATIA V5 CAM : CAM Automatisieren
DaiVied am 21.09.2011 um 11:22 Uhr (0)
Ich hab in der Dokumentation folgenden Code gefunden, den ich auf meine Bedürfnisse angepasst habeCode:Dim newPart Set newPart = CATIA.ActiveDocument Dim newProduct Set newProduct = newPart.Product CATIA.Documents.Add "Process" Dim PPR Set PPR = CATIA.ActiveDocument Dim Application Set Application = PPR.Application Application.StartWorkbench("ManufacturingProgramWorkbench") Dim Process Set Process = PPR.processes.Item("Process") Dim Setup If (Process.IsSubTypeOf("PhysicalActivity")) Then Set chil ...
|
In das Form CATIA V5 CAM wechseln |
|
CATIA V5 Programmierung : Ausspannung in CAM Process umbenennen
DaiVied am 20.09.2011 um 21:53 Uhr (0)
Super, deins funktioniert, wenn man die "As" anweisung weglässt.Jetzt hab ich Intuitiv mein code anhand von deinem umgeschrieben (mit meinem Basis C-Wissen) und das Produkt funktioniert auchCode:Sub CATMain() Dim processDocument1 Set processDocument1 = CATIA.ActiveDocument Dim PPR1 Set PPR1 = processDocument1.PPRDocument Dim process1 Set process1 = PPR1.Processes.Item("Process") Dim manufacturingSetup1 Set manufacturingSetup1 = process1.GetItem("Aufspannung.1") manufacturingSetup1.name = "Standart ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ausspannung in CAM Process umbenennen
DaiVied am 20.09.2011 um 17:14 Uhr (0)
Zur Übung habe ich mich an folgendem Code, um ein einfaches Item umzubenennen, versucht:Code:dim manufacturingProgram1, processDocument1, manufacturingSetup1Sub CATMain() Set processDocument1 = CATIA.ActiveDocument Set manufacturingProgram1 = processDocument1.GetItem("Herstellungsprogramm.1") Set manufacturingSetup1 = manufacturingProgram1.GetItem("Aufspannung.1") manufacturingSetup1.name = "Standartaufspannung"End SubAls Fehlermeldung bekomm ich immer: "GetItem fehlgeschlagen"Weis vll jemand an was das li ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Neue Komponente in Assembly Design einfügen
DaiVied am 21.09.2011 um 13:20 Uhr (0)
Zur Übung versuche ich ein Makro zu schreiben, das eine neue Komponente ins Assembly läd. Mein code Dazu sieht so aus:Code:Sub CATMain() CATIA.StartWorkbench ("Assembly") Set productDocument = CATIA.ActiveDocument Set product = productDocument.Product file = CATIA.FileSelectionBox("Bitte Wählen sie einen Catia-Part aus", "*.CATpart", CatFileSelectionModeOpen) product.AddAffectedComponent(file)End SubAls Fehlermeldung bekomme ich immer: Das Objekt unterstützt die Eigenschaft oder Methode nicht: product ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Neue Komponente in Assembly Design einfügen
DaiVied am 21.09.2011 um 13:55 Uhr (0)
Vll so?Code:Sub CATMain() CATIA.StartWorkbench ("Assembly") Set productDocument = CATIA.ActiveDocument Set product = productDocument.Product dim component Set component = product.AddNewComponent(...)End SubTrotzdem: Immer noch die selbe fehlermeldung, wahrscheinlich weil ich da einen dicken denkfehler drin hab!und was für Argumente da in die Klammer gehören ist mir auch etwas schleierhaftVielen Dank!
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Werkzeugwechsel und Maschine hinzufügen
DaiVied am 22.09.2011 um 10:14 Uhr (0)
Folgendes Makro habe ich geschrieben um einen Werkzeugwechsel und eine Maschine hinzuzufügenhier der Code:Code:Sub CATMain() Dim processDocument Dim PPR Dim process Dim clamping Dim resourceList Dim manufacturingProgram Dim toolChange Set processDocument = CATIA.ActiveDocument Set PPR = processDocument.PPRDocument Set process = PPR.processes.Item("Process") Set clamping = process.GetItem("Aufspannung.1") clamping.name = "standard_clamping" call clamping.CreateMachine(Mfg3AxisWithTableRotationMachin ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Obere Ebene einer Taschenfräsen-Operation zuweisen
DaiVied am 23.09.2011 um 15:51 Uhr (0)
In der Doku hab ich folgendes gefunden:"Sub SetGeometry(iGeometryType, iReference, iProduct, iPosition) Assigns geometry to a Manufacturing Operation"und als Beispiel:Code:Set Product1 = Setup1.GetProductInstance() Dim Pocketing1 As ManufacturingOperation Set Pocketing1 = Program1.AppendOperation ("Pocketing",1) Pocketing1 .SetGeometry("PartBottom",Plane1,Product1,0)meine Version davon ist nun folgendeCode: Set processDocument = CATIA.ActiveDocument Set PPR = processDocument.PPRDocument Set process = PPR.p ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Obere Ebene einer Taschenfräsen-Operation zuweisen
DaiVied am 09.01.2012 um 11:43 Uhr (0)
Nachdem das Projekt ne Zeit auf Eis lag hab ich die Arbeit wieder aufgenommen. Ich Poste mal den Quellcode und beschreibe, was ich mir dabei gedacht habe. Wäre sehr nett, wenn mich dann jemand berichtigen könnte:Code:Set processDocument = CATIA.ActiveDocument Set PPR = processDocument.PPRDocument Set process = PPR.processes.Item("Process") Set clamping = process.GetItem("Aufspannung.1") Set manufacturingProgram = clamping.GetItem("Herstellungsprogramm.1") Set productJaw = PPR.products.Item("jaw_pattern. ...
|
In das Form CATIA V5 Programmierung wechseln |