|
CATIA V5 Programmierung : PDF aus der CATDrawing
RSchulz am 14.12.2012 um 14:01 Uhr (0)
Hallo Sergej,da du um Verbesserungswünsche gebeten hast, habe ich mal ohne den Code zu prüfen zwecks der Übersichtlichkeit bisschen was verändert...Code:Sub CATMain() Dim fso, PDFName Dim oDocument As Document Dim oDrawingDoc As Document Dim DrawingName As String Dim PDFFile as Object Dim PDFName As string Dim USERDIR As String Dim USERDIR2 As String Dim Blattnamealt As String Dim Blattname As String Dim FoldObj As Folder Set fso = CreateObject("Scripting.FileSystemObject") ---Dokument geo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zeichnungsmakro für Toleranzen
Tropby182 am 15.12.2012 um 13:59 Uhr (0)
halloda ich in catia sehr viel zeichnungen mache und in diesen immer wieder verschiedenen toleranzen eintragen muss wollte ich mir ein marko machen das wie folgt funktionieren sollte:-maß anklicken-marko ausführen1. ausgewähltes maß wird auf 0,1 gerundet2. je nach größe des maß wird im dann einen toleranz zugewiesen(bsp. 0-10 mm = +-0.2, 10-20 mm = 0.3,... usw.)da ich leider wenig ahung habe von makros hoff ich mal das mir jemd. helfen kannfalls noch iwelche infos fehlen werde ich diese gerne dazu schreibe ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selbst erstellte Parameter aus Part auslesen
geeeSTAR am 19.12.2012 um 14:03 Uhr (1)
hey leute,bin noch auf eine grundlegende frage gestoßen. wie ruft catia die parameter ab?ich will zb die gesamtblattanzahl auslesen und in den schriftkopf einfügen. die ganzen infos liegen im parameters1 Set. nachdem ich das ganze über watch fenster mal beobachtet hab, hab ich dem eintrag gefunden, und will den so aufrugen/zuweisenCode:Dim blattanzahlblattanzahl = parameters1.Item("RootParameterSetParentSheetsCount")es funktioniert aber iwie ned...nach der zueisung steht für den wert von blattanzahl "leer" ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : PDF aus der CATDrawing
SergejH am 20.12.2012 um 17:05 Uhr (0)
Hallo Rick,Noch ein Mal Danke für deine Hilfe und Kommentare.Hier ist lauffähiges Code:Code:Language="VBSCRIPT"Create by Sergej Hempel 14-12-2012Contact: sergej.hempel@de.araymond.comContact2: +49 7621 668 4511Version 2.1---------------------------------------Macro erstellt ein PDF vom ersten Zeichnungsblattund öffnet es in Acrobat Reader---------------------------------------- Sub CATMain()Dim fso Dim oPDF Dim PDFName As StringDim oDocument As DocumentDim FoldObj As FolderDim Path As StringDim TMPDIR As ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : VB macro in Batch mode
RSchulz am 09.01.2013 um 15:52 Uhr (0)
You could start CATIA with an vb.net applikation so if the memory usage goes to high you could restart catia for the next documents. AFAIK you could also hide the catia window and deactivating some functions of his GUI.Code:Useful Code: CATIA.RefreshDisplay = false CATIA.Interactive = false CATIA.DisplayFileAlerts = falseBut for that you have to learn much more about vb.net.------------------MFGRick SchulzNettiquette (CAD.de) - Was ist die Systeminfo? - Wie man Fragen richtig stellt. - Unities ÜBay - ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : DrawingThread
pb2013 am 23.01.2013 um 17:06 Uhr (0)
I have tried your code but it doesnt do anything in my drawing. Anyway my view is linked to 3D, all views are made from .catparts.I was thinking off something.... but I dont know if it is possible.Can we create a User "Generative View Style" where we select exactly the options for the View creation , and then when we create the view we simply select this Style for the view.This is theory only. I dont know where I can find, or how can I make this User "Generative View Style" , and if this is done how to ins ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia dateien in Sitzung
eisencarbid am 25.02.2013 um 14:04 Uhr (0)
Hallo liebe CAD - Mitglieder,mal wieder bin ich auf eine Anomalie bei Catia-Makroprogrammierung gestossen...ich möchte einen Hauptprodukt erzeugen und dazu paar Baugruppen und parts, hier ein einfacher Code: Sub catmain() Set mainProduct = CATIA.Documents.Add("Product") Set myComp = mainProduct.Product.Products.AddNewProduct("environment") Set myBG = mainProduct.Product.Products.AddNewComponent("Product", "BG_01") Set myScelett = myComp.Products.AddNewComponent("Part", "") ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Baugruppe mit Makro in Szene setzen
lamdiabolo am 13.05.2013 um 15:58 Uhr (0)
Habe jetzt ein Makro geschrieben was fast funktioniert, findet leider aber noch nicht die genaue Anzahl der Spanner. Muss ich noch ein wenig dran rumprobieren. Habe aber euren Tipp befolgt und die Spanner erst einmal als Products nachgebaut.Manchmal überschlägt sich mein Spanner um die Drehachse, was natürlich auch nicht sein soll. Sind noch ein paar Feinheiten zu ändern, aber eine solide Basis habe ich dank euren Ideen schon einmal, danke!Mein bisheriger Code:Sub CATMain()dim i as integerset selection1 =c ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Datenrettung bei Click OK to Terminate
bgrittmann am 20.04.2017 um 13:21 Uhr (1)
ServusWeder noch.Das ist in Microsoft Visual Studio (oder auch SharpDeveolp siehe zB hier).Also eine IDE für .NET.GrußBerndEDIT: Auf catia.cad.de findest du eine fertige Anwendung mit einer Erklärung.------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro programmieren um definierte Löcher zu finden
lamdiabolo am 18.04.2013 um 11:59 Uhr (0)
Habe erst einmal ausprobiert die einzelnen Löcher mit ihren Durchmessern einzeln zu finden.Das klappt jetzt.Leider erkennt die unterste If- Funktion den Wahrheitsgehalt nicht, sie gibt immer die Else- Anweisung an.Sub CATMain()set selection1 =catia.activedocument.selectionselection1.search ".hole,all"dim laenge as lengthdim hole1 as integerdim durchmesser as integerdurchmesser = inputbox ("Bitte geben sie den gesuchten Durchmesser an!", "Eingabe gesuchter Durchmesser", durchmesser)for i = 1 to selection1.c ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro programmieren um definierte Löcher zu finden
lamdiabolo am 17.04.2013 um 15:28 Uhr (0)
Habe jetzt mal probiert einzelne Durchmesser aus einem Bauteil einzufärben. Hat leider nicht so ganz funktioniert. Wird immer ein Laufzeitfehler ausgegeben.Damit ihr euch das mal genauer anschauen könnt, im folgenden mein Code:Sub CATMain()set document1 = catia.activedocumentset selection1 = document1.selectiondim durchmesser as integerdurchmesser= inputbox("Bitte geben sie den gesuchten Durchmesser ein!","Eingabe gesuchter Durchmesser", Durchmesser)selection1.search ".hole,all"dim laenge as lengthset laen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro programmieren um definierte Löcher zu finden
lamdiabolo am 18.04.2013 um 08:59 Uhr (0)
Danke Berndhat aber leider auch so nicht funktioniert.Hatte noch was neues ausprobiert, da mir Catia immer gesagt hat : "Objekt erforderlich: hole1. Ich wollte erst ALLE Löcher finden, welche danach nach ihrem Durchmesser durchgefragt werdenl. Hat aber leider auch nicht funktioniert, da dann der Fehler: "Das Objekt unterstützt diese Eigenschaft oder Methode nicht:hole1.diameter"Mein "neuer" Code ist:Sub CATMain()set document1 = catia.activedocumentset selection1 = document1.selectiondim durchmesser as inte ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro programmieren um definierte Löcher zu finden
lamdiabolo am 18.04.2013 um 14:42 Uhr (0)
Leider habe ich eure Anweisungen nicht genau verstanden, zumindest nicht so gut, das mein Makro jetzt einwnadfrei läuft.Denke ich habe wieder total triviale Fehler eingebaut, welche den einwandfreien Lauf stören.Code:Sub CATMain()set selection1 =catia.activedocument.selectionselection1.search ".hole.threaded=true,all"for i = 1 to selection1.countDim SelElemente() As ObjectReDim SelElemente(Selection1.Count) for i = 1 to selection1.countSet SelElemente(i) = Selection1.Item(i)Next iFor i = 1 To UBound(SelEle ...
|
| In das Form CATIA V5 Programmierung wechseln |
