ListView

[Scorpion]

:?: Народ не подскажите как дабавить новый Item и SubItem.
Заранее благодарен.
:lol:

[AiK]

А в справку слабо посмотреть?

Код: Выделить всё

        with  ListView1 do
        begin
            Items.BeginUpdate;
            Items.Clear;
                ListItem := Items.Add;
                ListItem.Caption := 'foo';
                ListItem.SubItems.Add('bar');

                ListItem := Items.Add;
                ListItem.Caption := 'foo2';
                ListItem.SubItems.Add('bar2');
            Items.EndUpdate;
        end;