Line index in Richedit

[Gutelo]

Hallo,

Wie bekommt man die Line-Indizes der ersten und letzten Zeile, die in einem Richedit angezeigt werden?

Was ich machen moechte:

Ich habe eine feste Position im Richedit (User hat vorher etwas markiert). Der User kann im Richedit scrollen. Nachdem ein Button gedrueckt wird soll das Richedit zurueck zur festen Position scrollen und zwar so, dass die Linie mit der Position mittig im Richedit liegt. Das scrollen erledige ich mit:

RichEdit1.Selstart := MyPos; Das Problem ist, dass das scrollen unterschiedliche Ergebnisse liefert abhaengig davon ob der User vorher oberhalb oder unterhalb zur Postion gescrollt hat. In den beiden Faellen wird die Linie mit MyPos entweder als erste oder als letzte Linie in Richedit angezeigt. Dadurch kann ich nicht einfach weitere Linien mittels

SendMessage(RichEdit1.Handle, EM_LINESCROLL,0,-10); scrollen da die Richtung nicht bekannt ist.

Wie bekomme ich information darueber welche Linien gerade im ClientRect angezeigt werden?

Gutelo