Du kannst es, soweit ich weiß, das über die ApplicationEvents abfangen:
---------------------------------------------------------------------
Private WithEvents oDocChange As Inventor.ApplicationEvents
Private Sub oDocChange_OnDocumentChange(ByVal DocumentObject As Inventor.Document, ByVal BeforeOrAfter As Inventor.EventTimingEnum, ByVal ReasonsForChange As Inventor.CommandTypesEnum, ByVal Context As Inventor.NameValueMap, HandlingCode As Inventor.HandlingCodeEnum)
'Mit BeforeOrAfter lässt sich bestimmt ob du vor oder nach dem Eingriff darauf reagieren willst.
If ReasonsForChange = kFilePropertyEditCmdType And BeforeOrAfter = kBefore Then
MsgBox "Du ändert gerade die Eigenschaften..."
'Aktion abbrechen
HandlingCode = kEventCanceled
End If
End Sub
---------------------------------------------------------------------
Hoffe das hilf dir soweit.
Gruß, Tim
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP