TListView Problem bei Item Caption-Änderung

[haentschman]

Ahh... Data ist nicht Data des Items sondern eine Stringlist ?
ListViewClients.Items[i].Caption := NewNick; sollte eigentlich funktionieren. (gültiger Index vorausgesetzt)
Die Caption wird immer in der ersten Spalte ausgegeben. Breit genug ? Wird nicht nochmal anders gesetzt ?

[ByTheTime]

Ja genau, so funktioniert es auch (wenn ich für i = 0 setze). ALso eigentlich müsste es doch gehen. Sollte jetzt das Kommando cmdNick kommen (siehe oben), dann muss er ja den Clienten finden, von dem die Nachricht kommt:

Delphi-Quellcode:

  cmdNICK:
    begin
      Clients.Items.Strings[ClientIndex] := Data.Strings[1]; //ListBox

      d := Clients.Items.IndexOfObject(TCPServer.Socket); //Ermittle Sender des Kommandos
      Victims.Items[d].Caption := 'Hallo'; //Testweiße einen "fertigen" String.
    end;

Jetzt bekomme ich eine Zugriffsverletzung ...

[haentschman]

Ich habe einen Teststring auf den 3. Index gesetzt. (bei 4 vorhandenen) ... ohne Probleme.

Sind denn genauso viel Items in der Listview wie Clients in der anderen Liste ? Ist der Index gültig ? Was sagt der Debugger ?

PS: wenn das funktioniert kommen wir zum optimieren ohne die Client Liste (Listbox) (Datenhaltung von Darstellung trennen)

[ByTheTime]

Sekunde, ich probiere gerade aus. Die Zugriffsverletzung entsteht wenn keine es den Clienten im ListView nicht gibt habe ich gerade herausgefunden

[Edit] Ah, ich sende das Nick Commando vor dem COmmando was die ListView füllt... Masl sehen, ich schrieb gleich was sich geändert hat

P.S.: Kommst du aus Kaben in der Nähe von FFM/Maintal?

[haentschman]

Karben zwischen FFM und Friedberg

[ByTheTime]

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 :?: