IdTCPServer/IdTCPClient: Verbindung ablehnen?

[sx2008]

Zitat von romber:

Der Objekt wir bei mir im OnConnect erzeugt, allerdings erst nach dem die Zugangsdaten geprüft und der Zugang genehmigt wurde.

Das würde ich ändern und das Objekt gleich erzeugen.
Ein Boolean Flag gibt an, ob der Client sich schon erfolgreich angemeldet hat.
Im OnConnect kann der Server z.B. eine Willkommensnachricht an den Client schicken aber es ist nicht der richtige Ort um schon durch die Anmeldung zu gehen.

Hier ein Beispiel für die Komunikation

Code:

Client öffnet die TCP-IP Connection
Server -> Client: "App-Server Version x.x"#13#10 (wird noch im OnConnect gesendet)
Client -> Server: "LOGIN username, passwort"#13#10
Server -> Client: "LOGIN OK"#13#10   oder "ACCESS DENIED"#13#10 (reaktion des Servers in OnExecute)
Server -> Client: "TEMP 25.5"#13#10  (das sind die Daten die der Server schickt, aber nur wenn der Benutzer angemeldet ist)
Server -> Client: "......."#13#10
Client -> Server: "LOGOFF"#13#10   (Client meldet sich ab)
Server schliest die TCP-IP Connection