Memo durchsuchen - Zeile in anderes Memo

[Ari]

Hallo

hab mich jetzt ein paar Stunden totgesucht, das einzige was ich gefunden hab hat aber immer eine Fehlermeldung hervorgerufen (hab die Befehle dann in die Zwischenablage kopiert und irgendwann waren sie weg -.-) und konnte keine Stellen der gesuchten Zeile in ein Label eintragen.

Möchte ein mehrzeiliges Memo nach einem Text wie "presolved problem has" durchsuchen. Aus der gleichen Zeile sollen dann die 23. bis 25. Stellen in ein Label eingelesen werden. Habs bereits mit einem Umweg über ein anderes Memo versucht aber auch das ging nicht.

Bitte helft mir!

edit: achja, ein Beispiel, hab versucht die bisherigen Befehle zu rekonstruieren:

Delphi-Quellcode:

    Memo3.Lines.Clear;
    for i:=0 to Memo1.Lines.Count-1 do begin
zz := Pos('presolved problem has', Memo1.Lines[i]);

    Memo3.Lines.Add(Memo1.Lines[zz]);
    end;

Mir wird in dem Memo3 aber nur die erste Zeile des Memos angezeigt. der gesuchte Text ist aber in jedem Fall vorhanden!