|
CATIA V5 Programmierung : VBA -> Einem Element ein Parameter zuweisen
Bernod am 15.04.2010 um 11:32 Uhr (0)
Hallo,mein Problem wurde in ähnlicher Weise schon ein paar mal hier angesprochen. Leider konnte ich die Hilfestellungen nicht auf mein Problem übertragen. Und zwar folgendes:- In meinem CATPart existiert eine Polyline und ein Parameter- Über ein VBA-Makro soll der Parameter ausgelesen und der Polyline als Biegeradius zugewiesen werden.- Die Polyline besteht beispielsweise aus 3 Punkten und soll den Radius an Punkt 2 bekommenMein Problem:- Ich verstehe nicht genau wie ich den Parameter an die Polyline überg ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : VBA -> Einem Element ein Parameter zuweisen
Bernod am 15.04.2010 um 15:59 Uhr (0)
Ich bin nun einen guten Schritt vorangekommen. Allerdings funktioniert es immernoch nicht eiwandfrei. ********************************************************* ************** wichtiger Abschnitt START **************** *********************************************************Dim hybridShapesX As HybridShapesSet hybridShapesX = hybridBody1.HybridShapesDim Polyline1 As HybridShapePolyline Hier wird die Polyline deklariert Set Polyline1 = hybridShapesX.Item("MEINEPOL") Anfangs muss ein willkürlicher Wert für d ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion durch Klick auf Button starten
Bernod am 20.04.2010 um 11:47 Uhr (0)
Ich habe es nun über Umwege hinbekommen, dass die Selektion funktioniert. Allerdings muss ich dazu das aktive Fenster nach betätigen des CommandButton1 verstecken (hide) und nach der Selektion wieder anzeihen (show)Code:Private Sub CommandButton1_Click()UserForm1.Hide Auswahl festlegen ----------------------------------------------- Dim Filter1(0) Filter1(0) = "Point" Selektion definieren und leeren ---------------------------------- Dim UserSel As Object Set UserSel = CATIA.ActiveDocument.Sele ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion durch Klick auf Button starten
Bernod am 20.04.2010 um 11:06 Uhr (0)
Hallo,ich bins schon wieder. ich möchte die Funktion aus meinem vorherigen Beitrag (Ausführen einer PowerCopy unter VBA) nun über eine GUI steuern.Dazu habe ich vorerst ein vereinfachtes UserForm erstellt.- Ich habe einen "CommandButton1"- und eine "ListBox1"- Wird der "CommandButton1" geklickt, dann soll die Selektion in Catia ermöglicht werden- nach der Selektion eines Elementes soll der name des Elementes in der "Listbox1" dargestellt werdenMein Code sieht derzeit wie folgt ausCode:1 Private Sub Command ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : VBA: Undo / Rückgängig durch Button ausführen
Bernod am 21.04.2010 um 11:46 Uhr (0)
Hallo,Ich habe eine UserForm erstellt, welche mir als Ergebnis eine Geometrie in CATIA darstellt. Nun möchte ich über einen Knopf die Undo-Funktion nutzen. Ich will also, dass der Anwender (nachdem die Geometrie in CATIA erzeugt wurde) über einen Button IN Catia einen Schritt Rückgängig macht. Ich habe hierzu den Befehl Application.Undogefunden. Ich weiß jedoch nicht wie ich diesen richtig anwende einsetze.Hat jemand eine Idee?Danke und Gruß,Bernod
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : VBA: Undo / Rückgängig durch Button ausführen
Bernod am 21.04.2010 um 14:52 Uhr (0)
Hallo,das Funktioniert leider nicht. Ich erhalte die Fehlermeldung Object doesnt support this property or method.Und nochwas .... Ich arbeite mit dem CATIA-eigenen VBA-Editor. Aus unerklärlichen Gründen finde ich über die Hilfe unterschiedliche Ergebnise zu der gleichen Suchanfrage. Manchmal werden keine Einträge zum Suchbegriff "undo" gefunden, und manchmal doch... woran kann das liegen?
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektionen eines Parts im Product
Bernod am 23.04.2010 um 16:53 Uhr (0)
Hallo,ich möchte diese Frage mal wieder hochschieben. Es muss doch möglich sein SelectElement4 korrekt anzuwenden?!Ich habe derzeit folgende Situation:- Ich habe ein Product, in diesem befinden sich 2 Parts- Als aktives Dokument ist das Part 2 gesetzt- Ich möchte einen Punkt aus dem Part 1 selektieren- Ich verwende vbaCode:01 Dim Filter(0)02 Filter(0) = "Point"03 Selektion definieren und leeren ----------------------------------04 Dim UserSel As Object05 Set UserSel = CATIA.ActiveDocumen ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : PowerCopy in Produktumgebung ausführen
Bernod am 26.04.2010 um 10:28 Uhr (0)
Hallo,ich habe das bereits in diesem Thema angesprochene Problem: http://ww3.cad.de/foren/ubb/Forum137/HTML/003626.shtml - Ich befinde mich in einem Product- In diesem Product befinden sich 2 Parts- ein Part ist als aktives Dokument gesetzt (Bsp. Part 2)- In diesem Part soll eine PowerCopy ausgeführt werden- Die Input-Geometrie wird per Selektion gewählt- Die Input-Geometrie befindet sich in einem anderen Part im gleichen Product (Bsp. Part 1). Die genaue Struktur des Products ist unbekannt.Bsp:Code:Produc ...
|
In das Form CATIA V5 Programmierung wechseln |
 Test01.zip |
CATIA V5 Programmierung : PowerCopy in Produktumgebung ausführen
Bernod am 26.04.2010 um 15:35 Uhr (0)
Hallo Daniel,vielen Dank für deine Antwort.Option Explicit habe ich bewusst nicht angegeben, da ich dachte dies bedeutet nur, dass undeklarierte Variablen nicht verwendet werden dürfen. Welchen Vorteil hätte ich dadurch? Oder habe ich das falsch verstanden?Und meine Variable "IntPointObj" ist global deklariert mit "Dim IntPointObj". Ich verstehe den Unterschied zwischen der Deklaration mit Dim, Public oder Private nicht.Versuche ich dein Makro auszuführen, dann passiert nichts bei mir. Weder eine Fehlermel ...
|
In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion abbrechen
Bernod am 08.06.2010 um 15:26 Uhr (0)
Hallo,ja, wie erwähnt kann man das über ESC abbrechen. Der Code kann dann z.b. So aussehenCode: Dim Filter(0) Filter(0) = "Point" Dim Text As String Text = "Bitte einen Punkt selektieren. Zum Abbrechen ESC drücken." Set Sel = CATIA.ActiveDocument.Selection Sel.Clear Dim intselabfragestr As String intselabfragestr = Sel_Body.SelectElement2(Filter, Text, False) Gibt Rückgabewert über Status der Selektion If intselabfragestr = "Normal" Then Wenn Selektion erfolgreich, dann.. [was auch ...
|
In das Form CATIA V5 Programmierung wechseln |