Thema "Betreff: Skizzensymbole mit Ilogic austauschen." in Inventor - Deutsches Forum

Skizzensymbole mit Ilogic austauschen.

haraldberger — Fri, 24 Dec 2021 09:06:38 GMT

Ich habe ältere Zeichnungen die veraltete Skizzensymbole beinhalten. Ich möchte wenn ich eine ältere Zeichnungen wiederverwende (Kopiere)

die veralteten Skizzensymbole mit den neuen Skizzensymbole austauschen/ ersetzen. Ich habe eine Vorlagezeichnung (Skizzensymbole.idw)

in der die aktuellen Symbole gespeichert sind (Pfad: M:\Autodesk2018\Inventor 2018\Design Data-2018\Symbol Library\Skizzensymbole.idw)

wäre schön wenn da jemand eine einfache Regel hätte.

Betreff: Skizzensymbole mit Ilogic austauschen.

S_May — Sat, 25 Dec 2021 19:50:05 GMT

@haraldberger

wäre schön, ein Muster von Alt und Neu zu sehen

Betreff: Skizzensymbole mit Ilogic austauschen.

haraldberger — Mon, 03 Jan 2022 06:16:37 GMT

Guten Morgen

im Screenshoot sehen sie die alten Symbole (roter Rahmen 2x). Diese möchte ich aus einer Vorlage (screenshoot 2) gegen das eine Symbol (roter Rahmen 1x) mit einer ilogic Regel austauschen.

Betreff: Skizzensymbole mit Ilogic austauschen.

haraldberger — Mon, 17 Jan 2022 12:19:13 GMT

Ich habe noch keine Antwort erhalten. Ist das irgendwie untergegangen?

Betreff: Skizzensymbole mit Ilogic austauschen.

ca-d.one — Mon, 17 Jan 2022 13:53:44 GMT

Huhu !

Du kannst mal den Übertragungsassistenten für Zeichnungsresourcen suchen.

Hier die Quelle angeben, anschliessend die "Ziele"....und hier einfach auf JA Klicken

Damit lässt sich das ganz schnell lösen 🙂

+dirk+

Betreff: Skizzensymbole mit Ilogic austauschen.

haraldberger — Mon, 17 Jan 2022 15:11:44 GMT

Hey Dirk,
Dann müsste ich jedes Mal wenn ich eine ältere Zeichnung öffne den Übertagungsassistenten öffnen und das neue (Zeichnungs) Ziel eingeben.
Das bedeutet wiederum dass ich jedes Mal Inventor beenden muss um den Übertragungsassistent starten zu können????
Das ist keine Lösung.

Betreff: Skizzensymbole mit Ilogic austauschen.

ca-d.one — Mon, 17 Jan 2022 16:51:55 GMT

Huhu !

Du musst 1x den Assistenten öffnen und die Quellzeichnung angeben.

Anschliessen, also im gleichen vorgang alle Zielzeichnungen angeben....Danach läuft der Kram dann durch.

...Es wäre besser, wenn man das ganze projektbezogen machen könnte, aber das geht leider nicht 😞

+dirk+

Betreff: Skizzensymbole mit Ilogic austauschen.

haraldberger — Tue, 18 Jan 2022 06:13:44 GMT

Hallo,
Das mit dem Übertragungsassistenten ist nicht möglich. Ich kann gar nicht sagen wo und welches überhaupt "alte Zeichnungen" sind. Das erkenn ich erst nach dem Öffnen der Zeichnung.
Es muss doch mit ilogic möglich sein in einer Zeichnung die Skizzensymbole zu berichtigen? Ich erkenne erst beim Öffnen der Zeichnung dass die einen alten Stand hat.
Ich benötige eine ilogic Regel!

Betreff: Skizzensymbole mit Ilogic austauschen.

Andre_Becker — Tue, 18 Jan 2022 09:23:54 GMT

Hallo @haraldberger ,

ich habe das mit folgendem Code bei mir realisiert.

Try ' Check active document type is a drawing document If ThisApplication.ActiveDocumentType <> DocumentTypeEnum.kDrawingDocumentObject Then Exit Sub ' Get active document Dim oCurDoc As DrawingDocument = ThisApplication.ActiveDocument ' Sketch symbol document Dim strPath As String = "Y:\Inventor_2021\Konfig\Vorlagen\DIN A4.idw" ' Check file exists If System.IO.File.Exists(strPath) = False Then : MessageBox.Show("Datei nicht vorhanden","Update Skizzensymbole") : Exit Sub : End If ' Open file Dim oOldDoc As DrawingDocument = ThisApplication.Documents.Open(strPath, False) ' Iterate through each symbol in the old document For Each oSD As SketchedSymbolDefinition In oOldDoc.SketchedSymbolDefinitions ' Copy sketched symbols to new document and replace if existing oSD.CopyTo(oCurDoc, True) Next ' Close old document without save oOldDoc.Close(True) ' Iterate through drawing resources browser nodes and collapse expanded ones Dim oTopNode As BrowserNode = oCurDoc.BrowserPanes.ActivePane.TopNode ' Top node is drawing resources folder For Each oNode As BrowserNode In oTopNode.BrowserNodes If oNode.Visible = True And oNode.Expanded = True Then oNode.Expanded = False Next ' Prompt for completion MessageBox.Show("Aktualisierung fertig", "Update Skizzensymbole") Catch Ex As Exception MessageBox.Show(Ex.Message, "Update Skizzensymbole") End Try

Muss aber zugeben das Dieser leider nicht von mir kommt. Ich habe das von hier...

https://forums.autodesk.com/t5/inventor-ilogic-api-vba-forum/import-sketched-symbols/m-p/8888169#M99139

Ich hoffe es hilft Dir etwas.

Betreff: Skizzensymbole mit Ilogic austauschen.

Peter.C.Schulz — Tue, 18 Jan 2022 09:46:51 GMT

Hallo @haraldberger,

konntest Du mit der Lösung von @Andre_Becker etwas anfangen? Oder brauchst Du noch weitere Hilfe?

Wenn der Post von @Andre_Becker geholfen hat, bitte als Lösung markieren, damit auch andere sehen können, das hier eine Lösung gefunden wurde.

Grüße, Peter