Форум: "Основная";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];
ВнизRichEdit скроллить до самого конца Найти похожие ветки
← →
cyberwolf (2003-07-23 23:48) [0]Подскажите пожалуйста, как установить положение скролла RichEdit в крайнее нижнее положение. Заранее благодарен.
← →
Marser (2003-07-24 00:37) [1]procedure TForm1.Button1Click(Sender: TObject);
var c:tpoint;
i:integer;
begin
c:=richedit1.CaretPos;
for i:=0 to richedit1.lines.count-c.Y-2
do
PostMessage(RichEdit1.Handle, WM_VSCROLL, SB_LINEDOWN, 0);
end;
Вместо выделенной двойки можно установить любое число видимых строк-1. В данном случае будет видна самая нижняя строка.
← →
cyberwolf (2003-07-24 01:08) [2]спасибо!!!
← →
PKT (2003-07-24 02:26) [3]SendMessage(RichEdit1.Handle, WM_VSCROLL, SB_BOTTOM, 0);
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.01 c