TServerSocket und Benutzeranmeldung

[Schwedenbitter]

Hallo,

ich habe TurboDelphi und bin daher in der Benutzung fremder Komponenten eingeschränkt. Ich habe bereits mittels entsprechender Tutorials (z.B. hier) ein Chat-Programm ausschließlich mit TServerSocket und TClientSocket nachgebastelt. Allerdings hat das keine Authentifizierung der Benutzer und bringt nur Broadcast.
Letzteres ist kein Problem (mehr), weil die Clients gleich als erstes die Benutzernamen an den Server senden und ich damit eine Liste parallel zu Socket.Connections[I] verwalte. Ich weiß also, welcher Benutzer welchen Index I hat. Die Textnachrichten enthalten dann immer einen selbstgebauten "Header", der Absender, Empfänger, Zeit etc. enthält.

Meine Idee ist es nun, bereits im Ereignis TServerSocket.OnClientConnect die Prüfung von Benutzernamen und Passwort mit reinzubasteln. Wenns nicht klappt, soll die Verbindung gleich wieder gekappt werden.

Nun meine Fragen:

• Kann man das generell so machen?
• Wenn ja, wie?
• Gibt es andere Alternativen (unter Beachtung meiner Probleme mit Fremdkomponenten bei TurboDelphi)?

Gruß, Alex