Problem mit SimpleRSS 0.4 und Listview

[Sharky]

Hai lucius,

einem TListView wird so eine neue "Zeile" hinzugefügt und beschriftet:

Delphi-Quellcode:

procedure TForm1.btn_FillListViewClick(Sender: TObject);
var
  listitem : TListItem;
begin
  listitem := lstbxheadlines.Items.Add; // Neues Item erzeugen
  listitem.Caption := 'blubb'; // Caption des Items setzen
end;

Das musst Du jetzt nur noch in deinen Code einbauen.

P.S.:
Diese Konstruktion in deinem Code brauchst Du nicht:

Code:

[s]      If SimpleRSS.Items.Count > 0 then 
      Begin [/s]
          For Counter := 0 to SimpleRSS.Items.Count-1 do 
          Begin
          .
          end;

Wenn in deinem SimpleRSS keine Items vorhanden sind würde (.Items.Count-1) den Wert -1 ergeben und die For-Do-Schleife nicht durlaufen werden da der Endwert kleiner als der Startwert ist.