|
CATIA V5 Programmierung : Brauche Hilfe bei Makroerstellung
spider2 am 23.01.2006 um 13:48 Uhr (0)
Hallo Forum,habe gerade Versucht mir ein Makro zu erstellen, was folgende Aufgabe hat:Selektieren von Elementen mit einer bestimmten Farbe im Drawing. Nach der Selektion soll die Strichstärke und die Linienart automatisch auf einen in dem Makro vorgegebenen Wert geändert werden.Mit meinem Makro bin ich schon mal soweit gekommen:Language="VBSCRIPT"Sub CATMain()Set drawingDocument1 = CATIA.ActiveDocumentSet selection1 = drawingDocument1.Selectionselection1.Search "Color=(255,0,0),all"End SubLeider fehlen mir ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part umbenennen mit Teilenummer
em Michael Kirsch am 15.07.2004 um 11:01 Uhr (0)
Hallo V5amSee, die PartNumber auszulesen und daraus einen Dateinamen zu bauen ist sicher nicht das Problem. Wenn die Parts nicht in Baugruppen eingebettet sind, lässt sich das im Prinzip folgendermaßen realisieren: Dim MyPartDocument As PartDocument Set MyPartDocument = CATIA.ActiveDocument MyPartDocument.SaveAs(MyPartDocument.Part.PartNumber) Wenn aber Baugruppen mit im Spiel sind, wird die Herausforderung darin bestehen, die geladene Baugruppenstruktur zu identifizieren und dann die geladenen Parts und P ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Point Repetiition
Basti1379 am 25.02.2019 um 18:33 Uhr (1)
Hi zusammen,Ich würde gerne die Select Case Methode benutzen jedoch sagt Catia "Anweisung erwartet" bei 1 to 5 und 9 to 10Code:Dim Number Number = 8 Select Case Number Case 1 To 5 msgbox("1 bis 5") Case 6, 7, 8 msgbox(" 6,7,8")Case 9 To 10 Case Else msgbox( "Not between 1 and 10" )End SelectLaut den Seiten sollte es gehen.https://docs.microsoft.com/de-de/office/vba/language/reference/user-interface-help/select-case-statementhttps://docs.microsoft.com/de-de/dotnet/visual-basic/language-reference ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Im CATProduct Part auswählen durch Pos.Nr.
CadV5UserR am 05.06.2008 um 15:44 Uhr (0)
Hallo Leute,Ich habe einige Baugruppen mit etwa 100 Bauteilen.Jetzt muss ich dazu 2d Zusammenstellung mit Positionsnummern erzeugen.Die Zuordnung 3d Teil mit Pos.Nr der Stückliste bereitet mir Probleme da ich etliche Winkel und Kabel verbaut habe.Um mir die Arbeit zu erleichtern möchte ich ein Makro schreiben in dem man eine Positionsnummer eingibt, und alle Teile mit dieser Positionsnummer sollen wie bei einer suche im Strukturbaum sichtbar gesetzt werden. Die Positionsnummer lese ich aus den Eigenschafte ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : PaperSize
Mertz am 22.04.2008 um 15:24 Uhr (0)
Halloseit der Umstellung auf R16SP7 funktioniert das Setzen der Papiergröße nicht mehr (mit R16SP6 ging es noch!). DrwSheet.PaperSize = CatPaperA3 (entspricht drwSheet.paperSize = 3) stoppt mit einer Fehlermeldung. Einzig DrwSheet.PaperSize = CatPaperUser (entspricht DrwSheet.PaperSize = 13) funktioniert. Prinzipiell kann aber die Papiergröße ausgelesen werden, d.h. MsgBox DrwSheet.PaperSize liefert die aktuelle Größe z.B. 6Ändert man auf DrwSheet.PageSetup.PaperSize = 3 dann gibt es zwar keine Fehlermeldu ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Product2Part Reloaded V5R18 SP2
Kai Knospe am 28.10.2008 um 10:51 Uhr (1)
Moin moin,die R18 hat ja doch einiges zu bieten...etwa ist endlich die ASD Funktion Product to Part implementiert:Code:Dim oProductDocument As ProductDocumentDim oProduct As ProductDim oProd2Part As DECProductToPartSet oProductDocument = CATIA.ActiveDocumentSet oProduct = oProductDocument.ProductSet oProd2Part = oProduct.GetItem("DECProductToPart")oProd2Part.RunsError = oProd2Part.GetErrorSet oAllCATPart = oProd2Part.GetResultDas Objekt taucht zwar im Objekt Browser auf, nur in der Hilfe nicht...und natürl ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Probleme mit UserSel
wulfgang am 02.03.2010 um 14:02 Uhr (0)
Hallo,habe deine Antwort wohl nicht ganz verstanden. Code:Dim Was(0)Was(0) = "Line"Definion und leeren der SelektionDim UserSel As ObjectSet UserSel = CATIA.ActiveDocument.SelectionUserSel.ClearDim EE = UserSel.SelectElement2(Was, "Line auswählen", True)If E = "Normal" ThenMsgBox (UserSel.Item(1).Value.Name)ElseMsgBox ("Abbruch")End IfDim myObj As Object Set myObj = UserSel.Item(1).ValueDim RefP As ReferenceRefP = MeinPart.CreateReferenceFromObject(myObj)Nun bekomme ich in der letzen Zeile die Meldung Zit ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : PartNumber
Erich am 25.03.2005 um 20:53 Uhr (0)
Hallo ich habe eine geöffnetes Part und möchte über ein Makro ein Struktur mit geöffneten Körper einfügen. OK. Das Part soll dabei auch einen Namen zugeordnet bekommen. Beim Erzeugen eines Parts funktioniert es, beim geöffneten Part nicht. Wer weiß Rat. Mein Code beim Erzeugen: Set documents1 = CATIA.Documents Set partDocument1 = documents1.Add( Part ) Set product1 = partDocument1.GetItem( Part1 ) Auf Partname steht beim Erzeugen der Name des Parts product1.PartNumber = EingabeName Set part1 = partDo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia V5 R14 mit JAVA Arbeiten
KlausJ am 22.02.2006 um 13:47 Uhr (0)
Du hast natürlich insofern recht, daß das Programm noch einmal mit den neuen Libraries kompiliert werden muß. Die DLLs müssen natürlich auch stimmen, aber die Schnittstellen und vor allem die internen Strukturen brauchst Du nicht im Einzelnen zu kennen, sondern werden nur über die Aufrufe bereitgestellt. Was dahinter ist, braucht Dich normalerweise nicht zu interessieren. Natürlich kann es auch dann noch vorkommen, daß Aufrufe, die bei einem Release funktionierten, im nächsten plötzlich nicht mehr richtig ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion mit der Maus
Pjack am 21.05.2008 um 13:09 Uhr (0)
Hallo Wicky,hatte vor einer Woche das gleiche Problem (Topic: Selektieren von Elementen)Damit müsste es klappen:Dim Was (1)Was(1) = "AnyObject"Set UserSel = CATIA.ActiveDocument.SelectionUserSel.ClearMsgBox ("Bitte jetzt das Objekt auswählen")Dim Ergebnis Ergebnis = UserSel.SelectElement2 (Was, "Bitte das Objekt jetzt auswählen", true)If Ergebnis = "Normal" Then MsgBox (UserSel.Item(1).Value.Name)Else MsgBox ("Abbruch")End ifUserSel.ClearDim MySelection1 as SelectionSet MySelection1 = UserSel.Item(1).Value ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Befehlsliste für Catia V5
MichaelTreiber am 02.03.2011 um 10:53 Uhr (1)
Eine Befehlsliste habe ich auch nicht gefunden, aber wenn du dir ein paar Skripts anschaust und du eine ähnliche Programmiersprache schonmal behandelt hast , ist es relativ leicht dort alles zu durchschauen, weitere Infos findest du auch in der V5automation.chm, fand die Datei am Anfang auch sehr kompliziert, aber wenn du dir die Struktur mal etwas genauer anschaust, ist es schon sehr übersichtlich und man kann dort sämtliche Begriffe nachschauen (nur mit dem Englisch muss man sich halt zufrieden geben, ab ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Befehle in vb als strings variieren und ausführen
93Aero am 19.09.2006 um 10:21 Uhr (0)
Hallo Daniel,so was wie ein Pointer auf die Funktion gibt es in CATScript sicher nicht... Nur es existiert doch ein Weg, allerdings ist es nicht die beste Lösung.Es gibt eine Funktion StartCommand und diese braucht ein String als Parameter, damit kannst Du Deinen Befehl ausführen lassen. Aber Vorsicht: das Ding läut nicht synchron, ich habe es benuzt um mein CAA-Commando zu starten, hier ist die VB-Code:Dim cat_obj As ObjectDim strCommand As String Set cat_obj = GetObject(, "CATIA.Application")strCommand ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro geometrische Set
Beemer328 am 30.01.2009 um 08:41 Uhr (0)
Ich nochmal. Habe in meinem Lieblingsforum (dieses hier) folgendes gefunden. Jetzt möchte ich nur noch die Sets an eine bestimmte Stelle z.B. unterhalb eines vorhandenen Sets erstellt haben. Kann man das da noch einbauen?sub CATMain() dim ar() set mypart = CATIA.ActiveDocument.Part pflichtnamen="Becks:Jever:Flens:Budwiser:Erdinger" set hybs = mypart.HybridBodies a = split(pflichtnamen,":") for j = 0 to UBound(a) if hybs.Count 0 then found = 0 for i = 1 to hybs.Count if a(j) = hybs.Item(i).Name the ...
|
| In das Form CATIA V5 Programmierung wechseln |
