So ist es - weil du mit einer virtuellen ListView arbeitest, musst du die Spaltenwerte im OnData-Ereignis der ListView übergeben.
Delphi-Quellcode:
procedure TDemoForm.ListView1Data(Sender: TObject; Item: TListItem);
var
i: integer;
begin
i := Item.Index;
z := CreateStrings(SimpleRSS.Items[i].Description);
lstbxheadlines.Items.Add(inttostr(i) + '-' + SimpleRSS.Items.Items[i].Title);
// Neues Item erzeugen
listitem := listview1.Items.add;
// Caption des Items setzen:
listitem.Caption := IntToStr(Succ(i));
listitem.SubItems.add(SimpleRSS.Items[i].Title);
listitem.SubItems.add(z.Values['Category']);
// ...
z.Free;
end;
Sobald du SimpleRSS geladen hast, musst du ListView1.Items.Count auf SimpleRSS.Items.Count setzen.
marabu