|
CATIA V5 Programmierung : Auswahl zweier Zeichnungen zum kopieren einer Ansicht
CEROG am 09.10.2008 um 20:51 Uhr (0)
Hallo zusammen,ich suche eine elegante Möglichkeit, aus zwei nebeneinanderliegenden Zeichnungen eine auszuwählen.Hintergund:Ich arbeite an einem CATVBA-Makro, das eine komplette Ansicht von einer Zeichnung in eine andere zu kopiert und vorhandene MML-Links beseitigt. Letzteres ist auch unter beibehaltung der Ditto-Strukturen (verschachtelte Dittos) kein Problem. Das ist zwar wegen der Unart CATIAs, Details und Dittos jedesmal umzubenennen, mühsam, aber kein Problem. Auch Details die bereits vorhanden sind, ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Fensterwechsel / Skizziererabfrage
mycon am 15.02.2011 um 22:49 Uhr (0)
Das will bei mir nicht funktionieren :/Schließe ich die .dxf vorher, kann ich nichts mehr pasten.Versuche ich einen fensterwechsel von 3D zu 3D z.b. von Produkt zu Part (nur zum testen) funktioniert es damit:Dim winDoc As WindowsSet winDoc = CATIA.WindowsDim winDoc1 As WindowSet winDoc1 = winDoc.Item("Part2")winDoc1.ActivateAllerdings funktioniert es nicht, wenn ich in der .dxf bin und wieder zu meinem "Part2" möchte.Ich versteh nur nicht wieso.Es kommt keine Fehlermeldung oder sonst was, er wechselt "nur" ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Erweiterte Flächen (Zusammenführung)
listing_code am 06.01.2004 um 16:43 Uhr (0)
Hi Ronnyich habe schon probiert den Quellcode über den macrorecorder aufzuzeichnen, aber leider wird nichts aufgezeichnet. Ich gehe dabei folgendermassen vor:1. ich öffne ein CATPart mit bereits gezeichneten Skizzen.2. Makrorecorder wird gestartet (einstellung auf *.CATScript)3. erzeuge per hand eine "Zusammenführungsfläche"4. Makrorecorder wird gestoppt.Wenn ich mir jetzt den Quellcode anschaue, wird dort nur der Pfad für den "geöffneten Körper" (Hybridbody) erstellt. Der Quellcode sieht folgendermassen a ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Einfügen eines vom User ausgewählten Parts innerhalb eines Produktes ohne Verknüpfung
Beny am 22.11.2011 um 10:54 Uhr (0)
Hallo Leute,Ich bastel gerade an einem Makro, wo ein User ein Product geöffnet hat, in dem er ein Part auswählt. Dieses soll dann in einem von meinem Makro erstellten Unterprodukt Tot eingefügt werden. (Per COPY/Paste) wenn ich das in Catia versuche, kann ich bei Paste Spezial des Objektes "Verknüpfung aufbrechen" auswählen.Was mus sich in meinem Makro hinter paste Spezial schreiben, damit es das auch bei mir macht?Auszug aus dem Makro da dieses leider zu Groß zum Posten ist: UserSel1.Copy Usersel2.Clear ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : klasse des Shape?
leipziger am 04.12.2005 um 20:39 Uhr (0)
Danke für die namenserklärungso habe ich es gemachtCATIA.Status.Bar = "Macro Remane_Assemble.CATScript, Version 1.0"Dim partDocument1 As PartDocumentDim part1 As PartDim body1 AS BodyDim body2 AS BodyDim bodies1 As BodiesDim shapes1 As ShapesDim shape1 As ShapeDim objecttype1 As StringDim name1 As StringSub CATMain ()Set partDocument1 = CATIA.ActiveDocumentSet part1 = partDocument1.partSet bodies1=part1.BodiesDim j As IntegerDim k As IntegerMsgBox Bodies1.CountFor j=1 To Bodies1.CountSet body1 = Bodies1.It ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : benannte View im Drawing erzeugen?
CT_Thomas am 08.10.2004 um 15:07 Uhr (0)
Hallo zusammen, ich bin gerade dabei ein kleines CATScript auf AIX zu schreiben, und komme nicht weiter. Wie kann ich in einem geladenen *.CATDrawing per Script eine benannte View erzeugen. Mein Sript funktioniert zwar, aber die View hat keinen Namen. Bsp. ich möchte eine View NOTES Hier mein bisheriges Script: Zitat: Language= VBSCRIPT Sub CATMain() Dim drawingDocument1 As Document Set drawingDocument1 = CATIA.ActiveDocument Dim drawingSheets1 As DrawingSheets Set drawingSheets1 = drawingDocument ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Rekursiv
okl am 13.03.2007 um 12:36 Uhr (0)
Moin TomTom!Ich denke, wir reden über dasselbe, haben nur unterschiedliche Sichtweisen auf das eigentliche Problem.Schön erklärt:http://de.wikipedia.org/wiki/Rekursive_ProgrammierungDu brauchst einfach extrem viel Speicher, um Deine Prozeduren und Methoden in den Speicher zu laden. Meines Erachtens wird nicht bei jedem neuen Prozeduraufruf die Variable neu beschrieben und das alte Ergbnis verworfen, denn sonst hättest Du am Ende des Tages nicht alle zugehörigen Inhalte ausgelesen. Also muss eine neue Varia ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro zur Umbenennung von Parts im Produkt erweitern
geekv5 am 13.07.2011 um 18:21 Uhr (0)
Hallo Zoltan,hat leider nicht so funktioniert, habe es jetzt als seperaten IF Block eingefügt, aber es geht trotzdem nicht Code:Sub traverse(Prod, origstr, newstr) set refp = Prod.ReferenceProduct if instr(refp.Name, origstr) then newpname = Replace(refp.Name, origstr, newstr) refp.Name = newpname end if if instr(refp.PartNumber, origstr) then newpnum = Replace(refp.PartNumber, origstr, newstr) refp.PartNumber = newpnum end if if instr(refp.Part.Mainbody.Name, origstr) then newpnum = Replace(refp.Part ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Name der Instanz ändern
Lusilnie am 01.05.2006 um 19:28 Uhr (0)
Hallo Leute,das Problem liegt daran, daß man nur im "aktivierten" übergeordneten Product die Instanznamen von darunterliegenden Parts und Products ändern kann. Also müßt ihr noch zusätzlich das übergeordnete Product-Document quasi "in Bearbeitung" setzen.Der CODE würde dann um ein paar Zeilen erweitert werden müssen:Code:Sub CATMain() Set ListeProduct = CATIA.ActiveDocument.selection Suche nach Instanzen vom jeweiligen CATPart im gesamten Dokument ListeProduct.Clear ListeProduct.Search "Assembly D ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : 2D-Komponente
mkim am 28.07.2005 um 15:46 Uhr (0)
Zitat: Original erstellt von joerg.m: Hallo zusammen, weiß jemand von Euch wie man per Makro feststellen kann, aus welchen konkreten Objekten (Linie, Kreis...) sich eine 2D-Komponente zusammensetzt? Vielen Dank! Gruß, Jörg hi joerg, hier ein bisschen beispielcode: die Benamsung ( Blatt.1 und View.4 aus Makrorekorder ) solltest du entsprechend anpassen... mkim Sub CATMain() Dim drawingDocument1 As Document Set drawingDocument1 = CATIA.ActiveDocument Dim drawingSheets1 As Drawi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Macro im Product ausführen
geekv5 am 25.05.2012 um 15:31 Uhr (0)
Hallo,hier meine Lösung:Code:Sub CATMain()Dim partdocument1 As PartDocumentDim part1 As PartDim selection1 As SelectionDim orderedgeometricalSets1 As OrderedGeometricalSetsDim orderedgeometricalSet1 As OrderedGeometricalSetDim adoc As DocumentOn Error Resume NextSet adoc = CATIA.ActiveDocumentIf Err.Number 0 Then Exit SubSet selection1 = adoc.Selection Select Case TypeName(adoc) Case "PartDocument" Set partdocument1 = adoc Case "ProductDocument" selection1.Search ("Part D ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Product.update funktioniert nicht!
LanzelotXXL am 11.11.2004 um 17:29 Uhr (0)
Hallo, ich habe ein kleines Problem mit der Aktualisierung, der Befehl Product1.update zeigt in meinem Makro leider keinerlei Wirkung! Das Makro ersetzt eine Komponente in einer Baugruppe durch mehrere Bauteile. Nach jedem Ersetzen wird die Baugruppe unter einem anderen Namen abgespeichert. Das funktioniert auch alles, nur werden die Baugruppen trotz Befehl nicht aktualisiert! Hier mal die Schleife des Makros: (Die Variablen werden vor der Schleife deklariert) For each oFile in cAllFiles sFileType = oFil ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Excelliste sortieren
Axel.Strasser am 27.04.2008 um 21:03 Uhr (0)
Hier ist noch mal eine neue Basis. Ich habe das mit einem vbs Script getestet und es hat funktioniert (Achtung, es gibt noch Unterschiede zwischen Office 2003 und Office 2007).Code:Dim objXL As ObjectConst xlTopToBottom = 1Const xlPinYin = 1Const xlYes = 1Set objXL = WScript.CreateObject("Excel.Application")Set fso = CreateObject("Scripting.FileSystemObject")Set WshShell = WScript.CreateObject("WScript.Shell")Datei="C:Dokumente und EinstellungenAxelDesktop estvor_bearbeitung.xls"objXL.Workbooks.Open Dateio ...
|
| In das Form CATIA V5 Programmierung wechseln |
