Mit readln nur bestimmte Textstelle auslesen

[hamptoncourt]

Hallo Leute, ich habe mal wieder ein Problem :-/ ...

Ich möchte eine TXT-Datei einlesen, die einen Quellcode einer Homepage beinhaltet. In einem Meofeld sollen nur die Überschriften der Themen ausgegeben werden. Ich lese die Datei als Zeile für Zeile mit readln ein.
Er soll die Zeilen quasi solange lesen, bis er den Text "H1" findet. Dann springt er zu dem Text, der sich zwischen einem größer- und einem kleiner-Zeichen befindet ( also: >auszugebener Text<). Diesen soll er dann in das Memo-Feld eintragen ...

Ich dachte, ich könnte das mit diesem Ansatz lösen:

Delphi-Quellcode:

var s : string; f : textfile;

repeat
readln(f,s);
Memo1.Lines.Add(s);
Until eof (f);

Hierbei gibt er natürlich einfach das komplette Dokument in dem Memo-Feld aus ... wie kann ich also den Bereich spezifizieren, der für mich interessant ist?

Habe das Forum schon einmal durchsucht, aber bislang nichts zu diesem Thema gefunden ...

Danke euch schonmal im voraus ...

Gruß
HC