AiK » 19 мар 2004, 13:17
А в справку слабо посмотреть?
Код: Выделить всё
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;
А в справку слабо посмотреть? :)
[code]
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;
[/code]