Форум: "Основная";
Текущий архив: 2007.12.09;
Скачать: [xml.tar.bz2];
ВнизMemo и прокрутка Найти похожие ветки
← →
Vendict © (2007-09-16 14:14) [0]Как застваить Memo прокрутить скрол на самый верх ?
← →
{RASkov} © (2007-09-16 16:00) [1]> [0] Vendict © (16.09.07 14:14)
Со сменой позиции каретки:procedure SetLine(AMemo: TCustomMemo; const Line: Cardinal);
begin
with AMemo do begin
SelLength:=0;
SelStart:=Perform(EM_LINEINDEX, Line, 0);
Perform(EM_SCROLLCARET, 0, 0);
end;
end;
//Вызов SetLine(Memo, 0);
И без смены(только прокрутка):Memo.Perform(EM_LINESCROLL, 0, - Memo.CaretPos.Y);
← →
Vendict © (2007-09-17 00:11) [2]Спасибо .
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2007.12.09;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.042 c