|
CATIA V5 Programmierung : Verdeckte Parameter löschen
JuPaV am 12.11.2010 um 12:17 Uhr (0)
Hallo! Versucht so:Sub CATMain()Set aDoc = CATIA.ActiveDocumentSet selection3 = aDoc.Selectionselection3.Search "(CATKnowledgeSearch.Set of parameters),all" If selection3.Count 0 Then Set params = selection3.Item(1).Value If params.AllParameters.Count 0 Then For i = 1 To params.AllParameters.Count Set param = params.AllParameters.Item(i) If param.Hidden Then param.Hidden = False End If Next End If selection3.Delete selection3.Clear Else If sele ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : VB-Projekt aus VB-Projekt heraus ausführen
roccat am 15.11.2010 um 11:01 Uhr (0)
Hallo Andi,für´s VBAProject sollte das so gehen, deine Parameter müßtest du den Params() als Array übergebenund dann in deiner gestarteten Sub wieder abrufen.Code:Sub StartScript()Dim SServDim sPath As StringDim sModul As StringDim sSub As StringDim Params()Set SServ = CATIA.SystemServicesPath = "C:TempTest.catvba"sModul = "Modul1"sSub = "CatMain"Call SServ.ExecuteScript(sPath, catScriptLibraryTypeVBAProject, sModul, sSub, Params)End SubGrüße aus dem Erzgebirge
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Abfrage Refresh – Icon aufleuchten
Starbirth am 15.11.2010 um 14:06 Uhr (0)
Was dir helfen könnte, dürfte die Methode "isUpToDate" sein, die dir jedes Part mit bringt.Kannst du ja mal testen:Sub Dingsbums()Dim ActiveDoc as DocumentDim aPart as PartSet aDoc=CATIA.ActiveDocumentSet aPart=aDoc.PartIf aPart.isUpToDate=false then MsgBox ("Das Part brauch ein Update")else MsgBox ("kein Update nötig")end ifend subHab ich jetzt grad so aus dem Kopf getippt. Keine Garantie auf direkte Einsetzbarkeit.[Diese Nachricht wurde von Starbirth am 15. Nov. 2010 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Abfrage Refresh – Icon aufleuchten
CadV5UserR am 15.11.2010 um 14:43 Uhr (0)
Hallo Starbirth,Danke für den Tipp mit dem IsUpToDate.Habe mir mal angeschaut wie der Aufruf sein soll.Hier eine funktionierende Version:-----------------------------------------------------------------------Dim ActiveDoc As DocumentDim aPart As PartSet aDoc = CATIA.ActiveDocumentSet aPart = aDoc.PartSet partRoot = aDoc.Part Set pad1 = partRoot.FindObjectByName("Hauptkörper") IsUpToDate = partRoot.IsUpToDate(pad1)If IsUpToDate = False Then MsgBox ("Das Part brauch ein Update")Else MsgBox ("kein Update nöti ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter Catdrawing loeschen
cmb am 15.11.2010 um 16:18 Uhr (0)
Hallo Forum,ich möchte gerne aus einer CatDrawing meine Parameter löschen.Im Forum habe ich die Aussage gefunden, das dieses nur über eine Selection funktioniert.Ich habe zum Löschen von 3D Parametern u.a. http://ww3.cad.de/foren/ubb/Forum137/HTML/004352.shtml gefunden .Leider erzählt mir meine Catia immer, das der Befehl search oder delete nicht zulässig ist. Anscheinend funktioniert das nur mit 3D Parametern.Da ich unter DrawingDocument.Parameters meine Parameter deklarieren kann, müsste mann diese doch ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter Catdrawing loeschen
DanielFr. am 15.11.2010 um 18:30 Uhr (0)
Hallo ,stimmt Parameter kann man nur über Selectionen löschen. D.h. aber nicht das du nach diesem Element auch suchen musst. Du kannst eine leere Selektion (Objekt) erstellen und anschließend ein beliebiges Objekt in diese Selektion "Stecken". Im Anschluss kannst du die Selektion löschen. Ein Beispiel deines nicht funktionierenden Codes wäre hilfreich ------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch meh ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfad zum Instanz ermitteln
DenNew am 15.11.2010 um 18:42 Uhr (0)
Hallo zusammen,Ich hoffe ich bin hier richtig mit meinem Problem.Wir möchten mit Excel unsere Teile verwalten, PLM-System steht nicht in Frage.Jetzt zum Problem:Ich habe eine Baugruppe. Auf der Festplatte sieht es so aus:Assy1.catproductAssy2.catproductPart1.catpartIn CATIA so:Assy1--Assy2.1----Part1.1----Part1.2--Assy2.2----Part1.1----Part1.2In Excel so:Assy1Assy2Part1Part1Assy2Part1Part1Problem: ich möchte in Excel ein Link erstellen, das z.B. Part1.2 aus Assy2.1 öffnet. Frage 1: ist es überhaupt möglich ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfad zum Instanz ermitteln
DenNew am 16.11.2010 um 00:19 Uhr (0)
Hallo,Ja, die Tabelle ist wie eine Stückliste, wo Großeltern mit Eltern und Kindern verlinkt sind. In der Tabelle erstellen wir eine neue Zeile mit einer Komponente, physikalisch wird sie in CATIA von anderen Usern erstellt. Alle Parts und Products pflegen wir in einem Ordner.Was ich jetzt erreicht habe: ich kann die Dateien auf der Festplatte mit Hilfe von Excel automatisch finden und prüfen ob sie da sind, öffnen und Eigenschaften ändern, eine Back-up Kopie machen oder in einen anderen Ordner verschieben ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter Catdrawing loeschen
cmb am 16.11.2010 um 10:44 Uhr (0)
Hallo Daniel,vielen Dank für das Feedback. Nachdem ich gestern den ganzen Nachmitttag rumgemacht habe hat es heute morgen binnen einer halben Stunde geklappt. Mein Code:Code:Sub CATMain()Dim oDoc As DrawingDocumentSet oDoc = CATIA.ActiveDocumentDim selDrwDitto As SelectionDim oParameter As parameterDim I As IntegerFor I = 1 To oDoc.parameters.CountSet oParameter = oDoc.parameters.Item(I) Set SelectList = CATIA.ActiveDocument.Selection SelectList.Clear SelectList.Add oParameterEnd IfNextSelectList.DeleteEnd ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATVBA: FastenerSet.GetFastener() schlägt fehl?!
Lawyno am 15.11.2010 um 18:32 Uhr (0)
Hallo liebe Kollegen,ich benötige ein paar Daten von Fastener Objekten, die mit einem (vom Benutzer) ausgewählten Activity verbunden sind.Ich hätte das gerne auf folgende Art gemacht:Code:Dim intIndex As IntegerDim objSelectedActivity As ObjectDim objFastener As FastenerDim objFastenerLot As FastenerSetDim objFIS As DNBFastenerItemServicesSet objFIS = CATIA.GetItem("DNBFastenerItemServices")Selektiertes Activity holenSet objSelectedActivity = SelectActivity()Call objFIS.GetFastenersFromProcess(objSelectedA ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfad zum Instanz ermitteln
DenNew am 16.11.2010 um 11:32 Uhr (0)
Hallo,wir bauen die Bedingungen zwischen den Teilen über Publikationen (Achsen von zwei Teilen werden veröffentlicht und im Produkt Kongruenz gesetzt)Wenn ich richtig verstanden habe, ich muss die Koordinaten x,y,z jeden einzelnen Teil aus CATIA auslesen in Excel speichern. Muss ich die relative Koordinaten innerhalb einer Baugruppe oder absolute Koordinaten zu dem Hauptprodukt Nullpunkt speichern? Ich vermute jede Baugruppe muss einen Steuerpart mit Koordinatensystem haben, über das ich die Koordinaten vo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia V5 - 3D-Linie mittels VBA strichelen und einfärben
Beny am 16.11.2010 um 16:01 Uhr (0)
Hallo,Ich bin gerade dabei ein vba-Programm innerhalb von Catia zu schreiben.da möchte ich innerhalb des Codes eine 3D-Linie in einem Geoset 1mm dick und gestrichelt machen. zudem will ich noch eine beliebige Farbe per RGP-System zuweißen.weiß jemand wie man das macht?hier ein ansatz meines Codes... aber irgendwie will der die linie nicht einfärben (zeigt keinen Fehler und auch keine reaktion an) :-(... Dim Selection4001 As Selection Set Selection4001 = AktuellesPartDocument.Selection Selection400 ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia V5 - 3D-Linie mittels VBA strichelen und einfärben
JuPaV am 16.11.2010 um 16:35 Uhr (0)
Hallo! Das ist einfach:CATIA.ActiveDocument.Selection.Add Line line SelectionSet visProperties1 = CATIA.ActiveDocument.Selection.VisProperties visProperties1.SetRealColor 0, 128, 0, 1 FarbevisProperties1.SetRealLineType 4, 1 Line TypevisProperties1.SetRealWidth 4, 1 Dick Line------------------Mit freundlichen Grüßen,JuPaV
|
| In das Form CATIA V5 Programmierung wechseln |
