Скачать: CL | DM;

КАк прокрутить RichEdit на выделенную облась   Найти похожие ветки 

← →
TStas ©   (2005-06-23 00:26) [0]

Как заставить RichEdit, в который загружен большой текст прокрутиться на выделение? Сам он почему-то не прокручивается

---

← →
begin...end ©   (2005-06-23 11:58) [1]

Да, на XP сообщение EM_SCROLLCARET, которое посылается RichEdit"у при изменении свойства SelLength, почему-то ни на что не влияет.

Поэтому могу предложить только такой тупой способ:

1. Получить номер строки, в которой находится выделенный участок: N1 := SendMessage(RE.Handle, EM_LINEFROMCHAR, -1, 0).
2. Получить номер верхней видимой строки: N2 := SendMessage(RE.Handle, EM_GETFIRSTVISIBLELINE, 0, 0).
3. Прокрутить содержимое на N2 - N1 - 1 строк: SendMessage(RE.Handle, EM_LINESCROLL, 0, N1 - N2 - 1).

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.039 c