---

Guten Abend liebe CAD Gemeinde,

ich habe mal Benutzerdefinierte iProperties erstellt! Wenn ich das alte Modell nun aufrufe und als ein neues speichern möchte, würde ich die Benutzerdefinierten Werte automatisch löschen lassen wollen.
Kann mir da einer weiter helfen und hat jemand eine Idee?
Was man da berücksichtigen muss, ist, wenn mir jemand eine iLogic Regel vorschlägt, wird das alte Modell diese Regel aber noch nicht kennen.

Für anregende Lösungen wäre ich dankbar.

Gruß
Enric

------------------
Konstruktion

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Enric,

eine Möglichkeit wäre eine globale iLogic Regel, welche du ausführen kannst anstatt den Button "Speichern unter" zu benutzen.

Hier ein einfacher Grundaufbau

Code:

---

Dim oApp As Application = ThisApplication
Dim oDoc As Document = ThisDoc.Document

'Gibt den Speicherpfad vor
Dim sFullPath As String = "C:\Temp\Neues_Bauteil.ipt"

'Holt alle Benutzerdefinierten iProperties
Dim oCustomPropSet As Inventor.PropertySet = oDoc.PropertySets.Item("Inventor User Defined Properties")

'geht durch jedes benutzerdefinierte iProp und löscht es
For Each oCustProp In oCustomPropSet
oCustProp.Delete
Next

'Speichert Kopie (True) des Teils
oDoc.SaveAs(sFullPath, True)

'Schließt das vorhandene ohne zu Speichern
oDoc.Close(True)

'Öffnet dein neues Teil
oApp.Documents.Open(sFullPath)

---

Hier findest du weitere Möglichkeiten um z.B. nicht alle benutzerdefinierten iProperties zu löschen.

Wichtig ist, das Ganze als globale Regel einzubringen.

Grüße

EIBe 3D

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin

Aber so darfst du vor jedem Speichern den Pfad in der iLogic Regel anpassen.
Ich würde ganz simpel ein VBA-Makro nehmen und einen Button in den Benutzerbefehlen dafür erstellen. Bei Bedarf einmnal klicken und fertig. iLogic-Regeln lassen sich noch nicht in die Benutzerbefehle einfügen. Den Aufruf über den Regelbrowser finde ich zu umständlich.
Mal noch ein paar ergänzende Fragen.
Kommen die benutzerdefinierten iProps nur in Bauteilen oder auch in Baugruppen, Zeichnungen, Präsentationen vor?
Können wirklich alle benutzerdefinierten iProps weg oder nur bestimmte?
Sollen sie wirklich komplett gelöscht werden oder nur geleert?

------------------
MfG
Ralf

RKW Solutions GmbH
www.RKW-Solutions.com

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Ralf,

ich möchte nur die den Inhalt der Benutzerdefinierten iProps (Text) löschen. Wie sähe den dafür der Code? In VBA habe ich zu wenig Erfahrung!

MfG
Enric

------------------
Konstruktion

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo

Der folgende Code leert den Wert ALLER benutzerdefinierten iProperties. Die Typumwandlung in der GUI (Text, Zahl, Datum, Ja/Nein) erfolgt implizit und kann leider nicht zur Unterscheidung hergenommen werden. Falls es nur bestimmte, namentlich bekannte iProps sind, könnte man das Leeren darauf eingrenzen. Der jetzige "Gießkannenmodus" birgt immer das Risiko zu viel zu löschen.

Öffne mit Alt+F11 den VBA-Editor
Lege im Anwendungsprojekt (Default.ivb) ein neues Modul (mit sinnvollem) Namen an
Kopiere den Code da rein
Schließe den Editor
Rechte Maustaste auf die Ribbonleiste --> "Benutzerbefehle anpassen..."
Such auf der linken Seite unter "Makros" dein (sinnvoll) benanntes Script
Füge es den Benutzerbefehlen hinzu
Dialog schließen
Ausprobieren

Code:

---

Option Explicit

Public Sub ClearAllUserDefinediProps()

Dim oApp As Inventor.Application
Set oApp = ThisApplication

Dim oDoc As Document
Set oDoc = oApp.ActiveDocument

Dim oPropset As PropertySet
Set oPropset = oDoc.PropertySets.Item("{D5CDD505-2E9C-101B-9397-08002B2CF9AE}")

Dim oProp As Property
For Each oProp In oPropset
    oProp.Value = ""
Next

End Sub

---

------------------
MfG
Ralf

RKW Solutions GmbH
www.RKW-Solutions.com

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Ralf,

ich werde es heute ausprobieren!

Danke für die Hilfe

VG
Enric

------------------
Konstruktion

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Ralf,

ich versuche Modul1 um zu benennen! Gelingt mir nicht! Kannst du mir da noch einen Tipp geben?

VG
Enric

------------------
Konstruktion

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Enric,

Wenn du im VBA-Browser dein Modul1 markierst, siehst du direkt im Fenster drunter "Eigenschaften Modul1"
Da kannst du den Namen ändern.

------------------
Gruß Roland

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP