Listview (gleiche Zeile- unterschiedliche Spalte)

[Testy]

Bekomme aber mit diesem Code an der Stelle
ListItem.SubItems.Add(r.Match[0]); eine AV!
Habe ich etwas vergessen? Zwei Columns habe ich auch erstellt! ViewStyle der Listview ist auf vsReport!

Hier nochmal ein längerer Auszug aus meinem Code:

Delphi-Quellcode:

WB_GetHTMLCode(Webbrowser1, Memo1.Lines);
  l := TStringList.Create;
  r := TRegExpr.Create;
  try
    r.Expression := '[0-9]{2}:[0-9]{2}:[0-9]{2}';
    if r.Exec(Memo1.Lines.Text) then
begin
    iRow:= 0;
    repeat
      ListItem:= ListView1.Items[iRow];
      ListItem.SubItems.Add(r.Match[0]);  //hier kommt die AV
      Inc(iRow);
    until not r.ExecNext;
    end;

  finally
    r.Free;
    l.Free;
end;