Показать сообщение отдельно
Старый 28.02.2010, 15:07   #132
Dimon
Оператор ЭВМ
 
Регистрация: 22.02.2010
Сообщений: 48
Написано одно полезное сообщение
Ответ: Lib_font32: Графические шрифты

помогите реальзовать автоскрол чтобы нажимаешь на GA_FIRE и текст сам листается, а когда еще раз нажимешь на GA_FIRE текст перестаёт листаться, т.е. автоскрол выключается
если так делаю то пока держу кнопку текст листаетс, отпускаю перестаёт а мне надо чтоб на 5 включался режим автолистинга, и на5 отключался. odd мне писал, но не получатся
key2:=GetKeyPressed;
if key2 = GA_FIRE then
begin
repeat
MoveDown(10); Cls; DrawTextWindow; DrawVScroll(0, text_height, GetPosition, hi); Repaint; Delay(200);
until key2=GA_FIRE end;
(Offline)
 
Ответить с цитированием