Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.022 c
6-29984
Randal
2003-01-22 01:46
2003.03.10
Заполнение интернет-форм без их загрузки


1-29786
X1
2003-02-26 10:35
2003.03.10
Адрес переменной


8-29968
_Ed_
2002-11-29 05:55
2003.03.10
Момент окончания воспроизведения *.wav


7-30163
Drex
2003-01-08 09:27
2003.03.10
Как проверить наличие в системе портов LPT1 и LPT2 ?


6-29996
KoHe4Ho }|{e 6ot
2003-01-22 21:03
2003.03.10
Как написать свой DNS ?