Текущий архив: 2003.03.10;
Скачать: CL | DM;
Вниз
Scroll Найти похожие ветки
← →
hooch © (2003-02-28 09:13) [0]День добый !
пытаюсь вот так проскролировать memo:
var
si : TScrollInfo;
begin
si.cbSize := SizeOf(TScrollInfo);
si.fMask := SIF_PAGE or SIF_POS or SIF_RANGE;
GetScrollInfo(Memo1.Handle,SB_HORZ,si);
si.nPos := si.nPos + 10;
SetScrollInfo(Memo1.Handle,SB_HORZ,si,true);
бегунок смещается, но текс остается на месте, подскажите что я не так делаю ?
← →
hooch © (2003-02-28 10:21) [1]heeeelp :-)
← →
hooch © (2003-02-28 10:29) [2]всем спасибо :-) разобрался
← →
Blacki © (2003-02-28 10:32) [3]а что сделал то? написал бы хоть что ли
Страницы: 1 вся ветка
Текущий архив: 2003.03.10;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.014 c
