Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.024 Beiträge
 
Delphi 12 Athens
 
#11

AW: TListView Problem bei Item Caption-Änderung

  Alt 5. Sep 2012, 21:22
@Uwe Raabe: Uff... Wie genau soll das den funktioniern? Einer Variable vom Typ TListItem die FindCaption zuweißen? Was kommt dann in die Deklaration der Funktion?
Wenn du den alten Nick kennst:
Delphi-Quellcode:
procedure TfrmMain.RenameClient(OldNick, NewNick: String);
var
  item: TListItem;
begin
  item := ClientListView.FindCaption(0, OldNick, false, true, false);
  if item <> nil then
    item.Caption := NewNick;
end;

oder wenn du beim Anlegen mit AddItem den Socket als Object mitgegeben hast:
Delphi-Quellcode:
procedure TfrmMain.RenameClient(Socket: TCustomWinSocket; NewNick: String);
var
  item: TListItem;
begin
  item := ClientListView.FindData(0, Socket, true, false);
  if item <> nil then
    item.Caption := NewNick;
end;
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat