Forum: VB.NET |
Thema:
Re: Anzahl von Objekten während der Laufzeit ermitteln? |
Von:
Klaus Holster (
02.12.2004 16:45) |
Hallo Balu,
das geht mit einem shared field in der Klasse:
Public Class TestClass
Implements IDisposable
Public Shared InstancesCreated As Integer = 0
Public Shared InstancesAlive As Integer = 0
Public Sub New()
InstancesCreated += 1
InstancesAlive += 1
End Sub
Private disposed As Boolean = False
Public Overloads Sub Dispose() Implements System.IDisposable.Dispose
Dispose(True)
GC.SuppressFinalize(Me)
End Sub
Private Overloads Sub Dispose(ByVal disposing As Boolean)
If Not Me.disposed Then
If disposing Then
Me.Dispose()
End If
InstancesAlive -= 1
End If
disposed = True
End Sub
End Class
Mit TestClass.InstancesCreated kann man dann abrufen, wie oft TestClass instanziiert wurde.
TestClass.InstancesAlive sagt, wieviele davon noch existieren.
Hth,
Klaus
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!