|
CATIA V5 Programmierung : Trägheit mehrerer Flächen messen
Machiwi am 24.06.2012 um 13:04 Uhr (0)
Hey,da ist wohl beim kopieren was schief gelaufen, sorry. Natürlich muss das so heißen:Sub Catmain ()MsgBox "Wählen Sie den zu untersuchenden Körper aus", vbInformation, makroname + " " + version AppActivate "CATIA V5" Set selection1 = activedoc.Selection Dim InputObjectType(0) InputObjectType(0) = "AnyObject" Status = selection1.SelectElement2(InputObjectType, "Wählen Sie den Körper aus", False) If (Status = "Cancel") Then MsgBox "Makro wurde abgebrochen", 16, makroname + " " ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA Meldungen unterdrücken
RAA am 26.06.2012 um 09:42 Uhr (0)
Hallo Bernd,der Tip mit drawingView1.GenerativeBehavior.ForceUpdate war genau das, was noch fehlte.Ich habe vorher die jeweilige View über das drawing aktualisiert (drawingDocument1.Update) und vorher alle bis auf eine View gesperrt.Ich habe die Views deshalb gesperrt, weil ich eine Zeichnung habe, die einzelne Artikelvariantenin je einer View zeigt, die alle von ein und demselben Product abstammen. Zwischen den einzelnenViews baue ich in dem gleichen Makro das Product um und aktualisiere so View nach View ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA Meldungen unterdrücken
bgrittmann am 26.06.2012 um 10:40 Uhr (0)
ServusKönntest du dies nicht auch über eine Szene darstellen,dann würdest du dir das sperren bzw das "Umbauen" der Baugruppe sparen?GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Einfügen einer Skizze in ein OGS
danw am 26.06.2012 um 11:12 Uhr (0)
Hallo Bernd, danke für die Antwort.Ich habe gesehen, dass es in meinem Fall keinen Unterschied macht, wenn ich die Skizzen in einem allgemeinen Body statt in einem OGS erzeuge.In meinem Makro will ich Punkte aus einer Excel Tabelle auslesen und anschließend eine Spline durchlegen lassen. Hat soweit auch geklappt, die Skizze und die Punkte sind dort, wo sie sein sollen. Nur beim Erzeugen der Spline hängt sich CATIA auf.Habe schon überprüft ob die Dimension von TopPoints stimmt (das tut sie), die Deklarierun ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : MsgBox inkl. Parameter
moppesle am 26.06.2012 um 12:30 Uhr (0)
Hallo rettev,ich würde das über eine Rule realisieren.If `Höhe Bauteil` 10mmMessage ("Wert größer "+`Höhe Bauteil` +" wählen")------------------Gruß UweAuch Catia ist nur ein Mensch!
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA Meldungen unterdrücken
RAA am 26.06.2012 um 15:14 Uhr (0)
Hallo Bernd,als kurze Erklärung zur Prozedur.Der Umbau des Product erfolgt in der CAD-Integration unseres PDM-Systems,deshalb bin ich hier gebunden (deshalb keine Szene).Die Views habe ich deshalb gelockt, da jede View eine andere Variante des Products zeigtund ein unbedachter Druck auf des Update Button des Benutzers die ganze Aktion zunichte machen kann. Deshalb locke ich nach Ablauf des Makros alle Varianten-Views.mfgRainer
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Einfügen einer Skizze in ein OGS
MarkusFMT am 15.01.2008 um 11:39 Uhr (0)
Hallo,ich versuche nun schon seit einiger Zeit mit Hilfe eines MS VisualBasic Makros eine Skizze in ein Ordered Geometrical Set einzufügen, bisher allerdings vergebens.Hier mein bisheriger Code (ohne Skizzengeometrie):--------------------------------------------------Sub CATMain()Set Document = CATIA.ActiveDocumentSet Part = Document.PartSet Bodies = Part.BodiesSet Body1 = Bodies.Add()Body1.Name = "Geometrie"Set OGSs = Body1.OrderedGeometricalSetsSet OGS1 = OGSs.Add()OGS1.Name = "Skizzen"Set Sketches = OGS ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro-Fehler 1002
xyon126 am 26.06.2012 um 22:45 Uhr (0)
Hallo Freunde! Ich habe ein Problem. Ich möchte die Stücke eines Produkts am Ende der .0001 der erste, .0002 Name des Baumes, usw, usw. Anzahl aber ich bekomme Fehler 1002 in Zeile 44. Können Sie helfen Bitte und um Vergebung für mein Deutsch.GrußCode:Sub CATMain() Crear objeto, Documento. Dim tmpDoc As Document Dim index as Integer Dim numero As String index = 1000 numero = ".000" Seleccionar todos los documentos abiertos. For Each tmpDoc In CATIA.Documents Modificar solo Parts y Products ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : InternalName vs. DisplayName (undokumentiert)
zoltan.bekesi am 09.11.2008 um 16:03 Uhr (0)
Hallo Zusammen,dieser Beitrag hat mir bei meiner Problem sehr viel geholfen, in einen Punkt scheint es aber trotzdem nicht zu funktionieren.Vielleicht weiß jemand einen Ausweg:Ich möchte die Flächen aller Bohrungen für Weiterverarbeitung aus dem Modell haben, und zwar als Referenz.Den B-Rep-String habe ich bis diese Tiefe verstanden und die Herkunft von "Assemble.50"="Bohrbearbeitung.1" auch entziffert (InternalName).Was mir aber noch Probleme verursacht ist die Name der Skizze. Ich kann nicht nachvollzieh ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Feature/Element UUID (IDNAME) auslesen
MarcDe am 25.06.2012 um 18:31 Uhr (0)
Hi Profis,wenn man im Strukturbaum eine Linie erzeugt (nur als Beispiel) und sie dann kopiert und wieder einfügt "as specified" dann heißen beide Elemente gleich. Das gleiche kann man natürlich auch einfach erzeugen indem man zwei beliebige Elemente einfach gleich benennt. Fakt ist, CATIA hat eine interne ID dafür.Frage: Kann man diese ID irgendwie auslesen? Hintergrund: Ich möchte eine Parents/Child-Analyse selbst nachprogrammieren, da diese ja nicht verfügbar ist in der Standard-API. Ich will dann per Re ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro-Fehler 1002
RSchulz am 27.06.2012 um 09:45 Uhr (0)
Versuch es mal damit... Wenn ich mich nicht täusche, sollte es das sein, was du suchst. Es ist wohl VBA und nicht CATScript.Code:Sub CATMain() Dim tmpDoc As ProductDocument Dim ChildDoc As Document Dim index As Integer Dim numero As String Dim i As Integer Set tmpDoc = CATIA.ActiveDocument index = 1 numero = ".000" If InStr(1, tmpDoc.Name, ".CATProduct") Then For i = 1 To tmpDoc.Product.Products.Count Set ChildDoc = tmpDoc.Product.Products.Item(i) If index = 1000 Then ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part im Product neu positionieren
DanielFr. am 27.06.2012 um 10:40 Uhr (0)
Hallo,Starte mal eine Makroaufzeichnung und wähle mit einem Rechtsklick auf den Kompass (3D-Bereich) die Funktion "Snap automatically To Selected Object". Klicke jetzt auf ein Part innerhalb der Produktstruktur (Selektion). Der Kompass springt auf den COG (Center of Gravity) des Parts. Mache jetzt einen Doppelklick auf den Kompass und stelle im oberen Abschnitt der GUI (Form) die Werte 0,0,0 (X,Y,Z) ein. Jetzt klickst du "Apply" und beendest die Makroaufzeichnung.Die Verschiebung mittels dem MoveableObject ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Intersection automatisch erkennen
DanielFr. am 27.06.2012 um 16:04 Uhr (0)
Hallo,du könntest mit Hilfe einer Reaction ein Ereignis beim Update des Parts auslösen. In einem VB-Code kannst du dann eine explizite Fehlerauswertung machen (z.B.: On error Resume next; If Err.Number = ???, etc.)Löst das Part beim Update einen Fehler aus kannst du diesen eingrenzen. Ist der Fehler auf die Intersection zurückzuführen kannst du das Fillet aktivieren / deaktivieren und das Update im Script nochmal neu anstoßen HTH ------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfesei ...
|
| In das Form CATIA V5 Programmierung wechseln |
