Проблема с ListView

[mar4elo]

      With ListView.Items.Add do
        begin
          Caption:=IntToStr(UserMas[i].UIN);
          SubItems.Add(UserMas[i].Password);
          SubItems.Add(UserMas[i].IP);
          SubItems.Add(UserMas[i].Name);
          SubItems.Add(Status);
          SubItems.Add(Ban);
        end;

Кароче получается как бы дерево.

Пример
Вот такая строчка в List view
2222 123 172.19.1.123 Вася Online False

Вопрос: Как Изменять значение столбиков?? Например Вася на ДИма???False на True...
Прочитать знаю как, а изменить х##r ego znaet

[NieL]

Держи:

procedure TForm1.Button2Click(Sender: TObject);
begin
  With ListView1.Items.Add do
  begin
    Caption := 'Test';
    SubItems.Add('2222');        {0}
    SubItems.Add('123');         {1}
    SubItems.Add('172.19.1.123');{2}
    SubItems.Add('Вася');       {3}
    SubItems.Add('online');      {4}
    SubItems.Add('false');       {5}
  end;
end;

procedure TForm1.Button3Click(Sender: TObject);
begin
  with ListView1 do
    if ItemIndex <> -1 then
    begin
      Items[ItemIndex].SubItems[3] := 'Дима';
      Items[ItemIndex].SubItems[5] := 'True'; // А вообще здесь лучше использовать CheckBox
    end;
end;

[mar4elo]

Спасибо, сейчас проверим.

[EdiRu]

ListView.Items[номер записи - строки].SubItems.Strings[2] := 'Дима';
ListView.Items[номер записи - строки].SubItems.Strings[4] := 'True';

[mar4elo]

Всё просто ОК

[mar4elo]

Можно тему закрыть