Einzelnen Beitrag anzeigen

flossinger

Registriert seit: 22. Aug 2005
Ort: südlich der Alpen
109 Beiträge
 
Delphi 5 Standard
 
#10

Re: tserversocket user unterscheiden

  Alt 6. Dez 2005, 14:51
Ja könnte sein, ich habe aus seinem 'hello' voreilig auf die Begrüssung des neuen clients geschlossen. Wie dem auch sei, für den anderen Fall würde ich ihm das folgende empfehlen:
Code:
for i:=0 to serversocket1.Socket.ActiveConnections - 1 do
   if (serversocket1.socket.connections[i].RemoteAddress = socket.RemoteAddress)
   and (serversocket1.socket.connections[i].RemotePort = socket.RemotePort)
   then serversocket1.socket.connections[i].sendtext('welcome')
   else serversocket1.socket.connections[i].sendtext('one more here')
   ;
- ist auch getestet und funktioniert.

der flossinger
  Mit Zitat antworten Zitat