hallo muetze1,
vielen dank für deine hilfe funzt alles wunderbar
warum bin ich da nicht selber drauf gekommen ?
jetzt hab ich nur (
) noch ein problem:
da alle clienten dann in der listbox abgespeichert werden, steht da ja der host und die
ip.
wenn nun aber mehrere clienten eingeloggt sind, weiß ich dann nicht mehr welcher listbox-eintrag
(also
ip + host) nun zu welchem user gehört !
deshalb habe ich versucht den nicknamen mit in die listbox zu speichern:
Im ClientConnect steht:
Code:
ClientSocket1.Socket.SendText(xorstring(nachricht, ''));
Nachricht setzt sich aus dem Nicknamen (den der User eingibt) und 'hat den Raum betreten' zusammen.
Da der Nickname eh nur 6 Zeichen haben darf, hab ich ihn wie folgt ausgelesen:
Code:
procedure TForm1.ServerSocket1ClientRead(Sender: TObject; Socket: TCustomWinSocket);
var
Texta, encode : string;
begin
texta := Socket.ReceiveText;
nick := xorstring(texta, '');
nick:=Copy(nick, 1, 6);
showmessage(nick);
end;
nun hab ich zwar den nicknamen im serverprogramm, doch wie bekomm ich den nun zu dem entsprechenden
host +
ip eintrag in die listbox ?? hab schon versucht das mit bei OnClientConnect einzubauen,
aber da ClientRead ja erst nach OnClientConnect ausgeführt wird, funzt das net !