Skizzensymbole mit Ilogic austauschen.

Skizzensymbole mit Ilogic austauschen.

haraldberger
Participant Participant
1.124Aufrufe
9Antworten
Antworten (9)
Nachricht 2 von 10

S_May
Mentor
Mentor

@haraldberger 

 

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

0 „Gefällt mir“-Angaben
Nachricht 3 von 10

haraldberger
Participant
Participant

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.

 

 

haraldberger_0-1641190245240.png

haraldberger_1-1641190399258.png

 

 

0 „Gefällt mir“-Angaben
Nachricht 4 von 10

haraldberger
Participant
Participant

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

0 „Gefällt mir“-Angaben
Nachricht 5 von 10

ca-d.one
Advisor
Advisor

Huhu !

 

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

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

 

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

 

 

LG

+dirk+

______________________________________________________
Ihr fandet einen Beitrag hilfreich? Dann vergebt dafür doch Likes!
Eure Frage wurde erfolgreich gelöst? Dann einfach auf den 'Als Lösung akzeptieren'-Button klicken!



Dirk Prante
Inventor Certified Professional<

0 „Gefällt mir“-Angaben
Nachricht 6 von 10

haraldberger
Participant
Participant
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.
0 „Gefällt mir“-Angaben
Nachricht 7 von 10

ca-d.one
Advisor
Advisor

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 😞

 

LG

+dirk+

 

 

______________________________________________________
Ihr fandet einen Beitrag hilfreich? Dann vergebt dafür doch Likes!
Eure Frage wurde erfolgreich gelöst? Dann einfach auf den 'Als Lösung akzeptieren'-Button klicken!



Dirk Prante
Inventor Certified Professional<

0 „Gefällt mir“-Angaben
Nachricht 8 von 10

haraldberger
Participant
Participant
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!
0 „Gefällt mir“-Angaben
Nachricht 9 von 10

Andre_Becker
Advocate
Advocate
Akzeptierte Lösung

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#M99...

 

Ich hoffe es hilft Dir etwas.

0 „Gefällt mir“-Angaben
Nachricht 10 von 10

Peter.C.Schulz
Autodesk Support
Autodesk Support

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



Peter Schulz

Technical Support Specialist