|
CATIA V5 Programmierung : Part update
DanielFr. am 23.04.2010 um 09:39 Uhr (0)
Hallo Norbert,es ist doch völlig unerheblich wo du im Produkt bist. Das ActiveDocument ist IMMER das Root-Produkt. Du kannst auch alle Parts auslesen und dann mit einer If..Then..Else nach dem entsprechenden Dateinamen suchen wenn du das Item nicht weißt.------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Cgr-Files in Product einfügen
DanielFr. am 23.04.2010 um 09:53 Uhr (0)
Hallo ,also der Fehler ist ohne Codeschnipsel für niemanden nachzuvollziehen. Das folgende Script funktioniert. Vielleicht vergleichst du mal und findest den Fehler Code:Sub CATMain() ***DEKLARATIONEN Dim intRootProdDocObj As Object ProductDocument Dim intIGESList(0) Dim intProdObj As Object As Product ***DATEINAMEN ÜBERGEBEN intIGESList(0) = "C:Documents and SettingsAdministratorDesktopIGES TEST.igs" ***INSTANZIERUNHG Set intRootProdDocObj = CATIA.Documents.Add("Product") intRootProdDocObj.P ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part update
DanielFr. am 23.04.2010 um 11:48 Uhr (0)
Hallo ,das sind keine Werte sondern Eigenschaften. Am besten du machst dir mal ein neues CATvba Projekt auf, fügst eine Modul ein und kopierst den Code hier rein. Im Anschluss blendest du im Editor über View - Toolbars die Symbolleiste "Debug" ein. Jetzt markierst du das Objekt "intRootProdObj" und fügst es über das Kontextmenü zur Watchlist hinzu (RMT - Add Watch - OK). Falls das Watch-Fenster nicht eingeblendet ist, kannst du das über das über View (Menüleiste) nachholen.Hast du das alles gemacht dann kl ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Cgr-Files in Product einfügen
Criollo am 23.04.2010 um 12:17 Uhr (0)
Hallo,anbei mein Code. Ich lasse in dem Code alle Varianten einer DesignTable durchlaufen. Bei bestimmten Konfigurationen wird jeweils ein CGR-File rausgeschrieben. Die Info (Name & Pfad) dazu kommt in den Array, den ich nachher zum einfügen der Daten verwende.Set root = CATIA.ActiveDocumentSet docs = CATIA.DocumentsSet mypart = PNSet myeinbau = mypart.Parent.ParentDim arrayOfVariantOfBSTR1 ()For each relation in mypart.relations If instr (relation.name, "Reifenposition") 0 then Set mydt = relation Exit ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Cgr-Files in Product einfügen
DanielFr. am 23.04.2010 um 14:11 Uhr (0)
Hallo ,ich gebe Bernd recht. Die Methode will ein eindimensionales Array. Ich verstehe hier so und so deinen Ansatz mit dem zweidimensionalen Array nicht ganz. Anbei mal meine Beispiel. Das Teil speichert aus jeder Konfiguration einer DesignTable ein *.cgr, erstellen danach ein neues Produkt und fügt diesem alle erstellten *.cgr hinzu. ------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Letzten Wert einer Schleife um einen Schritt zurück setzen
dusches am 23.04.2010 um 14:53 Uhr (0)
Hallo!Ich möchte gerne, dass eine Schleife in einer großen Schrittweite bis zum definierten Endwert durchläuft und mir dann aber den vorletzten Wert ausgibt.Von diesem vorletzten Wert möchte ich die gleiche Schleife erzeugen, allerdings mit einer kleineren Schrittweite bis zum definierten Endwert.Ich habe auch schon ein kleines Makro. Der Parameter "Z1" wird so lange verschoben, bis die Messung den Wert "0" annimmt.Am Ende der Schleife nimmt der parameter "Z1" dann auch einen Endwert an. Diesen möchte ich ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : ParameterSet in Body / Körper
tobiley am 26.04.2010 um 09:28 Uhr (0)
Hallo,ich habe folgende Frage, ist es möglich ohne KWA-Linzenz Parameter in einem Body einzufügen? Ein ParameterSet konnte ich bereits mit hilfe folgendem Code erstellen (Baum im Anhang als Jpeg), allerdings kann ich diesen nicht ansprechen bzw. dort einen Parameter erstellen. Es wird bei einer Überwachung in VBA Editor auch keine Rubrik Parameters angezeigt, somit kann nicht mit "MyBody.Parameters..." gearbeitet werden.Vielen Dank für eure Hilfe!Sub catmain()Set MyPart = CATIA.ActiveDocument.PartSet Mybod ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektionen eines Parts im Product
IIYTII am 10.09.2009 um 10:17 Uhr (0)
Hallo,ich habe mal wieder eine Frage: Ich möchte gerne eine Achse eines Parts anklicken, welches im Product verbaut ist. Das Part ist im Grunde eine Platte und besitzt eine Bohrung in der Mitte. Wenn ich jetzt den Benutzer auffordere, die Achse der Bohrung direkt im 3D Modell anzuwählen (nicht im Strukturbaum), dann kann nur das gesamte Part angewählt werden und dementsprechend wird mir auch nur dessen Name zurückgegeben.Geplant ist eigentlich den Pfad der Achse auszulesen, um eine Bedingung nachher anzuse ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektionen eines Parts im Product
DanielFr. am 10.09.2009 um 17:39 Uhr (0)
Hallo,"selectElement2" funktioniert nur im aktiven Dokument. Ist dies ein Produkt kannst du nur Features des Produktes selektieren. In deinem Fall selektiert er richtigerweise die komplette Instanz. Versuch mal das "SelectElement4". Hiermit ist es möglich auch in anderen Dokumenten (also in der Partinstanz) zu selektieren.Hier mal der Auszug aus der *.chm Datei:Func SelectElement4( CATSafeArrayVariant iFilterType, CATBSTR iActiveDocumentMessage, CATBSTR iNonActiveDocumentMessage, boolean iTooltip, CATI ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektionen eines Parts im Product
IIYTII am 11.09.2009 um 13:08 Uhr (0)
Ja, ich glaube das mit dem Type missmatch lag daran, dass ich "Achse" nicht als Array definiert hatte...Code:Dim ProductnameDim AchsennameDim OberflachennameDim EDim UserselSet Usersel = CATIA.ActiveDocument.selectionDim Achse(1)Achse(0) = "Line"E = Usersel.SelectElement4(Achse, "Achse wählen")If E = "Normal" ThenMsgBox (Usersel.Item(1).Value.Name)Achsenname = Usersel.Item(1).Value.NameElseMsgBox ("Abbruch")End IfUsersel.Clearnächster Fehler ist: Wrong numer of arguments or invalid property assignment
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektionen eines Parts im Product
IIYTII am 11.09.2009 um 13:57 Uhr (0)
Code:Sub main()Dim dDim was(1)was(0) = "Pad"was(1) = "Line"Set d = NothingDim userselSet usersel = CATIA.ActiveDocument.selectionusersel.ClearDim e As Stringe = usersel.SelectElement4(was, "Achse selektieren", "Nicht aktiv", True, d)MsgBox (d.Name & ":" & e)usersel.ClearEnd SubHabe es jetzt hinbekommen, dass wenigstens keine Fehlermeldung kommt. Eine Achse auswählen, kann ich jedoch immernoch nicht....
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektionen eines Parts im Product
IIYTII am 14.09.2009 um 08:11 Uhr (0)
Danke für die Antworten, leider auch hier negativ.Trotz "AnyObject" klicke ich auf eine Achse und bekomme als Ausgabe eine Msgbox mit dem obergeordneten Productnamen. Leider nicht den Namen der Achse :-(Jemand noch eine Idee? Macht es evtl. Sinn einen Benutzerauswahlfilter zu setzen? Kann mir vorstellen, dass dann dennoch das Product ausgelesen wird, anstatt die Inhalte des Parts. Die Achse wird auch nicht gefangen...Code:Sub main()Dim i As Integeri = 0Do Until i = 3Dim eDim filter(0)Dim d As DocumentSet d ...
|
| 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 |
