Interneteintrag in Listview auflisten

[eistee]

Delphi-Quellcode:

      Anfang := '<td>[B][In den Korb][/B]</td>';
Ende   := 'Anzeigen';
Pos0     := Pos(Anfang, s);
Ergebnis := Copy(s, Pos0 + length(Anfang), 129);
Pos1     := Pos(Ende, Ergebnis);
Delete(Ergebnis, Pos1, 129 + length(Anfang));
ergebnis := Stringreplace(ergebnis, '<center>', '', [rfReplaceAll]);
ergebnis := Stringreplace(ergebnis, '</center>', '', [rfReplaceAll]);
ergebnis := Stringreplace(ergebnis, '<td>', '', [rfReplaceAll]);
ergebnis := Stringreplace(ergebnis, '</td>', '', [rfReplaceAll]);
ergebnis := Stringreplace(ergebnis, '<div style=', '', [rfReplaceAll]);
ergebnis := Stringreplace(ergebnis, '<tr>', '', [rfReplaceAll]);
ergebnis := Stringreplace(ergebnis, '</tr>', '', [rfReplaceAll]);
ergebnis := Stringreplace(ergebnis, '"color: limeGreen;">', '', [rfReplaceAll]);

Showmessage(ergebnis);

Damit bekomme ich jetzt

Glückskeks
0.2
Verfügbar

angezeigt wie bekomm ich es in das Listview bzw wie trenne ich die 3 Sachen?

Mfg