ATTENTION READERS! Lucky's VB Gaming Site is no longer active. For updated game programming information and tutorials, please visit The Game Programming Wiki!
Auflisten der Verbindungstypen
Widerstand zwecklos - du kommst auf meine Liste!
Was wir hier machen hat nichts mit Mafia zu tun (noch mit irgendwelchen
Borg), sondern wir werden unserem Spieler eine nette Liste erstellen aus
der er auswählen kann, über was für eine Verbindung er spielen
möchte (IPX, Seriell, TCP/IP). Um diese Informationen anzeigen zu
können, müssen wir aber erst das Objekt DirectPlayEnumConnections
mit Daten füllen:
Dim objEnumConnections As DirectPlayEnumConnections
Set objEnumConnections = dp.GetDPEnumConnections("",
DPCONNECTION_DIRECTPLAY)
Jetzt können wir die Anzahl der zur Verfügung stehenden Verbindungen
durch einen Aufruf der GetCount Methode ermitteln:
Dim lngNumConnections As Long
lngNumConnections = objEnumConnections.GetCount
Als nächstes müssen wir durch jeden Verbindungstyp gehen und
seinen Namen extrahieren. Dann schreiben wir ihn in ein Listenfeld.
Dim LstBox as ListBox
For i = 1 To lngNumConnections
LstBox.AddItem
= objEnumConnections.GetName(i)
Next
