Форум: "WinAPI";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];
Вниз
Как программно проскролить текст в memo ? Найти похожие ветки
← →
CAMCOH © (2004-11-03 21:03) [0]Нашёл вот такой вариант
memo1.Perform(WM_VScroll, SB_LINEDOWN,0);
но delphi непонимает WM_VScroll почемуто...
← →
Игорь Шевченко © (2004-11-03 22:40) [1]Наверное потому, что uses Messages не указано ?
← →
CAMCOH © (2004-11-04 08:42) [2]Spasibo :)
← →
Boban (2004-11-05 10:22) [3]Все это хорошо, а кто знает, как организовать ПЛАВНЫЙ скроллиг в мемо и RichEdit ?
← →
Ученик (2004-11-05 21:46) [4]Видел тут такой код
var
i: Integer = 0;
procedure TForm1.Timer1Timer(Sender: TObject);
var
r : TRect;
begin
r:=memo1.clientrect;
inc(i);
R.Top := R.Top - i;
memo1.Lines.BeginUpdate;
memo1.perform(em_setrectnp,0,Integer(@r));
memo1.Lines.endUpdate;
end;
← →
Игорь Шевченко © (2004-11-05 22:16) [5]
> Все это хорошо, а кто знает, как организовать ПЛАВНЫЙ скроллиг
> в мемо и RichEdit ?
1. Вопросы задаются каждый в своей ветке.
2. ScrollWindowEx с SW_SMOOTHSCROLL в flags.
← →
Ученик (2004-11-05 22:54) [6]>Игорь Шевченко © (05.11.04 22:16) [5]
Если не затруднит, пример рабочего кода ?
← →
Игорь Шевченко © (2004-11-05 23:22) [7]Ученик (05.11.04 22:54) [6]
Готового нету, если писать, то попозже, ок ?
← →
Ученик (2004-11-05 23:29) [8]>Игорь Шевченко © (05.11.04 23:22) [7]
Да, ok
← →
Игорь Шевченко © (2004-11-05 23:42) [9]Ученик (05.11.04 23:29) [8]
На всякий случай, черкани письмо на whitefranz@hotmail.com, чтобы не потеряться.
← →
Boban (2004-11-10 10:04) [10]Проблема не в собственно плавной прокрутке, а в организации "подкачки" новых выплывающих строк RichEdit. Игорь, есть соображения по этому поводу ?
Спасибо.
← →
Игорь Шевченко © (2004-11-10 11:38) [11]
> а в организации "подкачки" новых выплывающих строк RichEdit.
Насколько мне известно, эта функцинальность уже заложена в Edit-controls, в том числе и в RichEdit
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2004.12.26;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.041 c
