---

Hallo zusammen.

Ich habe das untenstehende Makro in einer Reaction "verbaut" nun kommt leider immer eine Fehlermeldung bei oselectiondelete......
Die Fehlermeldung heißt: Internal Update Error Part 1
Ich habe leider keine Ahnung voran das liegt. Kann mir einer von euch weiterhelfen?

Gruß Heiko

Der Code:

Sub main

'Geometrical Set loeschen
Set oSelection = oPartDocument.Selection
oSelection.Clear
oSelection.Add oHybridShapeLineNormal
oSelection.Delete
oSelection.Clear
oSelection.Add oHybridShapePointOnSurface
oSelection.Delete
oSelection.Clear
oSelection.Add oHybridBody
oSelection.Delete

If oLineDirection(0) > 0 Then
    oJoinFlaeche.Invert = Not oJoinFlaeche.Invert
End If

'inWorkObject zuruecksetzen
oPart.InWorkObject = sInWorkObject

End Sub

[Diese Nachricht wurde von HHCOE am 16. Nov. 2007 editiert.]

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

---

Hallo HHCOE,

ich versuche mich mal kurz zu fassen, denn Deine Infos sind etwas spärlich.

1. Du hast Automatic_Update für Parts aktiviert.
2. Es sieht aus, als löschst Du Elemente, die Referencen für andere Elemente sind.
3. Du hast als Kommentar "Geometrical_Set löschen" stehen, löschst aber bestimmte Element-Typen.

Wenn "2." nicht zutrifft und Du alle "Geometricel_Set's" löschen willst, dann kannst Du sie über "oSelection.Search" suchen und anschließend löschen. Dauert zwar, je nach Struktur, etwas länger, hat aber meistens den gewollten Erfolg.

Wenn das Gesagte Dein Problem nicht löst, beschreibe es noch einmal genauer!

mfg,
Lusilnie

------------------

Alle Aussagen zu DassaultSystemes-Produkten sind sehr optimistisch, selbst diese!!!

frei nach größeren Geistern

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