Hallo Leute,
Ich moechte meiner Listview von oben ab mit Neuen Eintragen fuellen.
Habe aber leider kein Plan wie ich das hinkriegen soll.
Habe schon etwas rumgeguckt hier im Forum aber irgendwie komm ich nicht weiter.
Delphi-Quellcode:
for o := 0 to w.Count -1 do
begin
listview.Items.BeginUpdate;
x.Insert(0, w.Strings[o]);
z := CreateStrings(SimpleRSS.Items.Items[o].Description);
listitem := listview.Items.Insert[o]; <---------- Muesste richtig sein?
////////////////////Neu Eintraege///////////////////////////////
listitem.Caption := IntToStr(Succ(o));
z.Values['Added'] := Parse(' ', z.Values['Added'], 1);
listitem.SubItems.Add(z.Values['Added']);
listitem.SubItems.Add(z.Values['Category']);
listitem.SubItems.Add(SimpleRSS.Items.Items[o].Title);
listitem.SubItems.Add(z.Values['Size']);
listitem.SubItems.Add(z.Values['Status']);
listitem.SubItems.Add(z.Values['Speed']);
listitem.SubItems.Add(SimpleRSS.Items.Items[o].Link);
listitem.SubItems.Add(z.Values['Download']);
///////////////////////////////////////////////////////////////
Neu.Caption := 'Anzahl NEUE Items: ' + IntTostr(w.count);
z.Free;
listview.Items.EndUpdate;
end;
Kann mir da einer bitte weiterhelfen?
Besten Dank im voraus.