Hallo zusammen,
Besteht die Möglichkeit ein Objekt einer (selbstgeschriebenen) Klasse über eine Klasseninterne Methode zu terminieren.
z.B. soll die Remove-Methode eines Objektes meiner Klasse das Objekt gleich auf Nothing setzten (sprich den Destruktor aufrufen).
Dim obj as Object
Set obj = New Object
...
Call obj.Remove
If obj is Nothing Then
...
End If
Gibt´s da was?
Gruß
Johnson
Nicht ganz: Das Objekt soll sich selbst "zerstören"!
s. Remove-Methode im Beispielcode (der so wie er hier steht einen Fehler beim compilieren wirft)
Class Object
Private m_doc as NotesDocument
Sub New(doc_source as NotesDocument)
Set m_doc = doc_source
End Sub
Sub Delete()
End Sub
Sub Send(var_sendto as Variant)
Call m_doc.Send(var_sendto, False)
End Sub
Sub Remove
Call m_doc.Remove(True)
Delete Me
End Sub
End Class