Gewisse Zeile mit bestimmtem Wort aus Memo (html) auslesen

[Maxisoft2]

Liebe Delphianer,

Ich stehe mal wieder vor einem Problem -
Ich muss für ein Forum ein Programm schreiben, dass den HTML Quelltext einer gewissen
Seite ausliest, und mir dann im Quelltext immer nur die folgenden Textstücke:
<A href="profile.php?ids=verschiedenezahlen">
rauskopiert und in einer .txt speichert.

Soweit sogut - momentan lese ich so den Quelltext der Seite aus und trage ihn in ein
Memo ein:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var
  vTemp : variant;
begin
  vTemp := WebBrowser1.Document;
  if Webbrowser1.LocationURL <> '' then
    Memo1.Text := vTemp.Body.OuterHTML
  else
    ShowMessage('Seite nicht vorhanden!');
end;

Wie bringe ich es nun zum Stande, dass Delphi auf einen Knopfdruck exakt diese Zeilen mit profile.php?
in ein weiteres Memo oder in eine Textdatei kopiert?


In der Hoffnung, dass die Frage nicht zu banal aber dennoch lösbar ist,
- M. S.