|
CATIA V5 Programmierung : Makro Optionen ändern
steli am 15.08.2007 um 15:58 Uhr (0)
HalloHab ich schon probiert, geht leider nicht d.h die Aufzeichnung auf diesem Register funktioniert nicht.Da kommt einfach ein leeres Skript heraus.Versuch es jetzt über ein XML-file. Man kann über den Befehl CATBatGenXMLSet.exe ein XML von den Settings erstellen worin man die Settings ändern kann, über CATBatImpXMLSet.exe importiert man diese dann wieder in CATIA. Nur leider ist ein Neustart von CATIA nötig um die Einstellungen zu übernehmen.Oder gibt es eine Möglichkeit die Settings neu zu laden?
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : pdf
suzzy am 16.08.2007 um 12:26 Uhr (0)
Hallo Ihr,Wir haben in der Firma das Problem, dass wir unserer Dwgs (V5R16) auch als pdf abspeichern müssen. Nun hat dieser nette Teil ca 1800 einzelne parts-- also auch dwgs ( oder heisst das in V5 dws???). Dann noch sämtliche Schweissbaugruppen und letzendlich noch Montagebaugruppen. Also muss man ( vor allem ich!!) jede einzelne Zeichnung als pdf auch abspeichern. Nun die Frage: gibt es ein macro, dass der Zeichnung sagt speicher hier als CAtia und dort als pdf?Ein weiteres Manko unserer 3 Mann/Frau Tru ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : pdf
suzzy am 16.08.2007 um 12:29 Uhr (0)
habe zwar was im downloadbereich bei cad. de gefunden, nun die frage : wo wie was abspeichern?und zwar dieses:Language="VBSCRIPT"CATDRAWING nach PDF konvertieren -------------------------------------------------------------------------------- Script um .CATDRAWING Dateien nach .PDF zu konvertieren Michael Rösch / roesch-m@kasto.de--------------------------------------------------------------------------------Sub CATMain()folderinput = InputBox ("Bitte den Ursprungsordner eingeben","Eingabe","C:EINGABE",5 ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : pdf
Thomas Harmening am 16.08.2007 um 13:19 Uhr (0)
na hoffentlich kann da geholfen werden,Code:Sub CATMain()Set CATIA = GetObject("", "CATIA.Application") - für aufruf aus Xl ;)folderinput = InputBox("Bitte den Ursprungsordner in dem nur die Drawings drinnen liegen -bitte am Ende ", "Eingabe", "C:v5-draw", 500, 1000)folderoutput = InputBox("Bitte den Zielordner eingeben -bitte am Ende ", "Eingabe", "C:v5-pdf", 500, 1000)Dim fs, f, f1, fc, sSet fs = CreateObject("Scripting.FileSystemObject")Set f = fs.GetFolder(folderinput)Set fc = f.FilesFor Each f1 ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Benutzer-Selektion im Space UND im Spec-Tree
buschi am 16.08.2007 um 12:59 Uhr (0)
Servus,während der Laufzeit meines Makros wird der Anwender aufgefordert, eine Fläche im geöffneten CATPart zu selektieren: Dim UserSelSet UserSel = CATIA.ActiveDocument.SelectionUserSel.ClearDim Auswahl(0) Auswahl(0) = "HybridShapeExplicitSurface"Dim AA = UserSel.SelectElement2(Auswahl, "Bitte selektieren Sie das Flächenmodell ", True)Auf diese Weise kann der Anwender nun - im Space oder im Strukturbaum - eine tote Fläche (eben ein HybridShapeExplicitSurface) selektieren.Ich möchte aber, dass der Anwender ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Part in TitleBlock-Editor/ Fehler beim Ändern der Parameter
AndreeX00X am 17.08.2007 um 13:01 Uhr (0)
Hallo,Ich habe mir mit VB und parallel dazu mit CATScript ein Macro erstellt, welches im Part (später soll dass auch im Product so laufen) Parameter im Strukturbaum erstellt, in denen ich Werte eintragen kann und die ich dann später im Draw ins Schriftfeld übertragn möchte.Das mit dem Erstellen und Ändern der Parameter klappt auch soweit alles ganz wunderbar.Nun habe ich angefangen mein Draw zu bearbeiten, in dem ich den TitleBlock-Editor verwende. Ich bin nun soweit, dass ich die selbst von Hand erstellte ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter überprüfen ob vorhanden
AndreeX00X am 17.08.2007 um 11:30 Uhr (0)
Hallo YellowDevil,ich habe deinen Tipp mal ausprobiert, jedoch gibt mir VB den Fehler schon in der Zeile mit der For-Schleife an: Zitat:Laufzeitfehler 424Objekt erforderlichIch habe auch noch mal nachgeschaut, ob ich nicht das Ende für die For-Schleife vergessen habe (z.B. End For), so etwas gibt es aber nicht. Also kann es daran schon mal nicht liegen.Ich könnte mir jetzt nur noch vorstellen, dass ich es an die falsche Stelle gesetzt habe, jedoch wüsste ich nicht, wo ich es sonst hinsetzen sollte.Code:Sub ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter aus Part in TitleBlock-Editor/ Fehler beim Ändern der Parameter
AndreeX00X am 18.08.2007 um 16:42 Uhr (0)
Hallo LusilnieDanke für deine Lösung, jedoch hat es damit nicht so recht geklappt. Ich habe es aber trotzdem hinbekommen, nachdem ich mal ein wenig rumprobiert habe, wo der Fehler liegen könnte. Nachdem ich ReferenceProduct durch UserRefProperties ersetzt hatte (Zeile habe ich unten nochmal hingeschrieben), hat es dann genau so funktioniert, wie ich es haben wollte.Code:Set strParam1 = partDocument1.Product.UserRefProperties.Item("Erstellt")Bei meiner oberen Frage muss ich zugeben, dass ich micht nicht so ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : VB - API für 3D Curve im Free Style?
Andreas Isele am 21.08.2007 um 12:59 Uhr (0)
Hallo zusammen,Weiss jemand, ob es für die Bezier Kurven (Funktion 3DCurve) im Free Style Workbech im Visual Basic APIs gibt oder brauch ich dazu CAA? Ich möchte mit einem Script eine Bezierkurve erstellen.GrussAndreas------------------CATIA V5R14 SP08 / R16 SP05Windows XP Prof. SP02CATIA V424 R2AIX 4.3.3/5.2
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mittelpunkte finden
YellowDevil am 22.08.2007 um 03:20 Uhr (1)
Moin,ich habe mal die Methode mit den Edges ausprobiert und leider festgestellt, dass es nicht die Lösung ist. Zum einen werden die Bohrungen alle sauber gefunden und auch Punkte erzeugt und die Koordinaten ausgegeben, doch leider werden auch alle anderen Edges die nur im geringsten einen Radius haben mit gefunden. Somit muss eine Lösung her diese auszuschliessen. Ich hatte die Idee auf dem Edge eine PointOnCurve setzen zu lassen und zwar in per Prozent. Einmal mit 0 und 1, wenn bei beiden Punkten die Koor ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zugriff auf Achsensystem im GeoSet
crow73 am 09.02.2007 um 08:01 Uhr (0)
Hallo Zusammen,ich möchte gerne meine Achsensysteme Upgraden da dies alsLösung eines PMRs vorgeschlagen wurde. Leider schaffe ich esbis jetzt nicht auf die Achsensysteme zuzugreifen die sich ineinem Geometrical Set befinden. Bei den anderen die sich unterAxis Systems befinden ist dies kein Problem!(siehe unten)Sub CATMain()Dim partDocument1 As PartDocumentSet partDocument1 = CATIA.ActiveDocumentDim part1 As PartSet part1 = partDocument1.PartDim axisSystems1 As AxisSystemsSet axisSystems1 = part1.AxisSystem ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zugriff auf Achsensystem im GeoSet
Proofin am 09.02.2007 um 10:35 Uhr (0)
Hi,kannst du mal etwas genauer Beschreiben was du vorhast.Du kannst auch über ein Befehl Objekte selektieren ohne das der Anwender eingreifen muß.z.B.dim sSelset sSel = CATIA.ActiveDocument.SelectionsSel.Search("Typ=Achsensystem,all")Diese Zeilen selektieren alle Achsensysteme im aktive Dokument. Zu Beachten ist, das der Suchstring sprachabhängig ist in meinem Bsp. für die deutsche Version.
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zugriff auf Achsensystem im GeoSet
YellowDevil am 23.08.2007 um 05:48 Uhr (0)
Versuch mal folgendes:Dim oMySelDim oAxis(200)Dim iCountDim iZaehlerSet oMySel.CATIA.ActiveDocument.SelectionoMySel.ClearoMySel.Search(" .Axis System;all ")If oMySel.Count20 Then iZaehler=oMySel.Count2 For iCount=1 To oMySel.Count2 Set oAxis(iCount)=oMySel.Item2(iCount).Value Next oMySel.Clear For iCount=1 To iZaehler oMySel.Clear oMySel.Add oAxis(iCount) CATIA.StartCommand("Upgrade") oMySel.Clear NextEnd If
|
In das Form CATIA V5 Programmierung wechseln |