Angenommen in Deinem Memo steht folgendes:
Überschrift 1
jetzt kommt
ganz viel Text
bis derr Speicher überläuft
und nun folgen Daten
:::
1)daten
2)daten
dann könntest Du folgendes machen:
Delphi-Quellcode:
....
i:=-1;
repeat inc(i,1) until i>Memo1.Lines.count-1 or pos(':::',Memo1.Lines[i])>0;
...
So als Idee....
Gruß
K-H