Перейти на строку в RichEdit

Материал из DRKB

Перейти на строку в RichEdit[править | править код]

with Richedit1 do
begin
  SelStart := Perform(EM_LINEINDEX, LineNumber, 0);
  Perform(EM_SCROLLCARET, 0, 0 );
end;

{
The EM_LINEINDEX message returns the character index of the first character
on a given line, assigning that to selstart moves the caret to that position.
The control will only automatically scroll the caret into view if it has
the focus, thus the EM_SCROLLCARET.
}


Source: http://delphiworld.narod.ru/
ID: 01019