RichEdit von der Position zur Zeile

[clock50]

Hallo zusammen,

wie komme ich von der Position im Text zur Zeile in der die Position ist?

Delphi-Quellcode:

var p, z : Integer;
begin
p := JvRichEdit1.FindText('blablabla', 0, MaxInt, []);
JvRichEdit1.SelStart := p;
z := ? // welche Zeile 
end;