Guten Morgen Gemeinde.

Hintergrund: Ich habe anfangs eine Klasse erstellt, die von meiner MainForm.vb im _Load-Teil instanziert wird.

Private myClass As myClass
myClass = New myClass

Diese myClass besitzt eine Methode namens Setup(...), mit der ich Member-Initialisiere mit denen innerhalb der Instanz gearbeitet werden soll.


Später dann habe ich gemerkt, dass ich mehrere myClass-Instanzen benötige (derzeit sind es 8).
Die Setup-Funktion ist allerdings für alle 8 Instanzen die gleiche.
Nun möchte ich gerne die Gemeinsamkeiten in eine spezielle Klasse namens myClassSetup auslagern um Resourcen als auch Zeit zu sparen. Ich möchte also nicht für jede Instanz die Variable x,y,z explizit auf einen Wert setzen, sondern dies nur einmal zentral machen müssen. Instanz A,B,C,D...H greifen dann auf diese zu.

Nun meine Frage:
Wie mache ich dies nun am Besten? Zudem soll der Zugriff auf die myClassSetup-Klasse nur von den myClass-Instanzen möglich sein.
Von der myClassSetup gibt es somit genau eine Instanz, von der myClass-Klasse hingegen viele.

Vielen Dank im Voraus.

Hab jetzt nicht alles verstanden, aber vielleicht brauchst du eine Singleton Klasse?

Ja, der Einfall ist mir als ich den Beitrag gerade geschriben habe auch gekommen.
Kann ich sowas in VB.NET modellieren?
Wie realisiere ich eigentlich Pointer unter VB.NET?

Eine Singleton Klasse sieht ungefähr so aus:

Microsoft Visual Basic 2005 - Das Entwicklerbuch schrieb:

VB.NET-Quellcode

1. Public Sub MeineSingletonlasse
3. Private Shared locSingleton As Singleton
4. Private Shared locMutex As New Mutex
6. Private Sub New()
8. End Sub
10. Public Shared Function GetInstance() As Singleton
11. 'Vorgang Thread-sicher machen
12. 'Wartet, bis ein anderer Thread, der diese Klasse 'instanziert, damit fertig ist
13. locMutex.WaitOne()
14. Try
15. If locSingleton Is Nothing Then
16. locSingleton = New Singleton
17. End If
18. Finally
19. 'Instanzieren abgeschlossen, '...kann weiter gehen...
20. locMutex.ReleaseMutex()
21. End Try
22. 'Instanz zurückliefern
23. Return locSingleton
24. End Function
26. End Class

Vielleicht hilft das zu Pointern: [VB.NET] Pointer?!?

TuxuT schrieb:

Nun möchte ich gerne die Gemeinsamkeiten in eine spezielle Klasse namens myClassSetup auslagern

Genau die packst Du in Shared Properties.
Für die kannst Du auch eine Shared Sub New() neben die "normale" New-Prozedur legen:

Ja danke, mit Shared bin ich tatsächlic weitergekommen...!!!