Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Klasse nur einmal laden
Autor: DorisM
Datum: 11.11.03 18:45
Hallo Bene, dafür brauchst du das sogenannte Singleton-Konzept, bei dem es nur eine Instanz einer Klasse gibt. Beispiel dafür ist ein Oberbürgermeister, von dem es nicht zwei geben sollte. Die Klasse dafür lautet so: Imports System Public Class Oberbuergermeister Private Shared bm As Oberbuergermeister = Nothing Private name As String Private Sub New(ByVal name As String) Me.name = name End Sub Public Shared Function GetInstance(ByVal name As String) As Oberbuergermeister If (bm Is Nothing) Then bm = New Oberbuergermeister(name) End If return bm End Function Public Shared Function DeleteInstance() As Oberbuergermeister bm = Nothing Return Nothing End Function Public Property OBName() As String Get Return Me.name End Get Set(ByVal Value As String) name = Value End Set End Property End Class und der Aufruf z.B. so Dim MeinOB As Oberbuergermeister MeinOB = Oberbuergermeister.GetInstance("Hans") MessageBox.Show(MeinOB.OBName) Oberbuergermeister.DeleteInstance()

Klasse nur einmal laden	1.161	Bene	11.11.03 17:04
Re: Klasse nur einmal laden	796	WaldiMaywood	11.11.03 17:19
Noch ma ne kleine Frage	804	Bene	11.11.03 17:38
Re: Klasse nur einmal laden	817	DorisM	11.11.03 18:45
Re: Klasse nur einmal laden	725	Christian Peters	24.04.06 14:09
Re: Klasse nur einmal laden	696	spike24	25.04.06 11:58
Re: Klasse nur einmal laden	671	DorisM	25.04.06 20:38
Re: Klasse nur einmal laden	717	Christian Peters	26.04.06 09:21
Re: Klasse nur einmal laden	660	DorisM	26.04.06 09:48
Re: Klasse nur einmal laden	718	Christian Peters	26.04.06 10:24
Re: Klasse nur einmal laden	654	DorisM	26.04.06 11:18

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen