Registriert seit: 24. Sep 2011
Ort: Frankfurt
297 Beiträge
Delphi XE2 Architect
|
AW: TListView Problem bei Item Caption-Änderung
5. Sep 2012, 22:11
Hier nochmal etwas Code:
Client-Seite:
Delphi-Quellcode:
procedure TfrmMain.TCPClientConnect(Sender: TObject; Socket: TCustomWinSocket);
begin
ReceiveBuffer := '';
Socket.SendText(Syntax[cmdCLIENTINFO].Text + #13 + Nickname + #13 + APP_VERSION + #13); //das füllt die ListView
Socket.SendText(Syntax[cmdNICK].Text + #13 + Nickname + #13); //Das hier ist das Kommando was den Nick an schickt (beim Connect und auch beim NickChange)
end;
Server-Seite:
Delphi-Quellcode:
//beim cmdNick
Clients.Items.Strings[ClientIndex] := Data.Strings[1];//ListBox
d := Clients.Items.IndexOfObject(TCPServer.Socket);
ClientListView.Items[d].Caption := 'Hallo'; //wenn ich das hier entferne gibt es keien fehler, stattdesen wird ein neuer Client, mit dem neune Nick hinzugefügt, der alte wird aber nicht entfernt :?:
Lukas
Geändert von ByTheTime ( 5. Sep 2012 um 22:16 Uhr)
|