Einzelnen Beitrag anzeigen

DocE

Registriert seit: 25. Mär 2004
108 Beiträge
 
#3

Re: in einem RichEdit zu einer bestimmten Zeile scrollen?

  Alt 6. Okt 2006, 12:02
Hallo Heike,

also die Zeile auslesen kannst Du mit:

Zeile := SendMessage(RichEdit.Handle, EM_LINEFROMCHAR, RichEdit.SelStart, 0); Liefert "Zeile - 1" zurück...

Zum Setzen weiß ich leider nichts, man könnte aber in einer Schleife ausprobieren, wann eine neue Zeile beginnt, und dann SelStart setzen, also:

Delphi-Quellcode:
for i:=0 to length(RichEdit.Text)-1 do
begin

  if SendMessage(RichEdit.Handle, EM_LINEFROMCHAR, i, 0) = (GewuenschteZeile - 1) then
  begin
    RichEdit.SelStart := i;
    RichEdit.SelLength := 0; // oder anderer gewünschter Wert
    ActiveControl := RichEdit; // nur wenn nötig
    break;
  end;

end;

Grüsse
...Doc
  Mit Zitat antworten Zitat