Позиционирование в RichEdit

← →
Евгений Р. (2006-09-19 00:39) [0]

Программно меняю позицию курсора в RichEdit за пределы видимого окна. Как переместить видимую область к позиции курсора?

← →
guav © (2006-09-19 00:42) [1]

EM_SCROLLCARET

← →
Евгений Р. (2006-09-19 01:22) [2]

Я правильно понял?

SendMessage(re.handle, EM_SCROLLCARET, 0, 0);

Что-то не работает.

← →
guav © (2006-09-19 02:09) [3]

Да, правильно.

Проверил у себя - работает.
(Чтобы курсор стал виден, нужно ещё передать фокус в RichEdit. Но прокрутка к курсору работает и без этого)

← →
Евгений Р. (2006-09-20 00:38) [4]

Ну, блин, не работает.
Только при нажатии стрелочек на клавиатуре открывается нужная строка

n:=pos(trim(upper(edFind.Text)),s);
if n>0 then Begin
re.SelStart:=n+re.SelStart;
SendMessage(re.handle, EM_SCROLLCARET, 0, 0); End
else ShowMessage("ñòðîêà ""+edFind.Text+""íå íàéäåíà");
ActiveControl:=re;

Тогда вот это выполнить до прокрутки
<СODE> ActiveControl:=re;

← →
Евгений Р. (2006-09-20 02:04) [6]

Попробовал создать форму с нуля - работает,
а в моей сложной форме - не работает???

Позиционирование в RichEdit Найти похожие ветки