Memofeld in string

[Cogito]

Hallo,

an einer Stelle meines Programmes bekomme ich den Inhalt eines Datenbank-Memofelds als String übergeben. Soweit, so gut, ist auch kein Problem. Jetzt möchte ich aber genauer auf diesen String zugreifen, genauer formuliert, ich möchte eine Funktion schreiben die es ermöglicht, in diesem String einzelne Zeilen zurückgeben zu können. Beispiel:
Im Memofeld stehen 3 Zeilen:

Zeile 1
Zeile 2
Zeile 3

Jetzt möchte ich eine Funktion, die mir eine bestimmte Zeile aus dem String zurückgibt:

function ExtractLine(text: string; zeile: Integer): string;

Kann mir jemand sagen wie ich in einem String nun die einzelnen Zeilen zurückbekommen kann?