Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.09.23;
Скачать: CL | DM;

Вниз

Проверка клавиш сдвига   Найти похожие ветки 

 
Vitaliy_____   (2007-08-30 07:54) [0]

Интересует синтаксис:
В FormMouseWheelDown(Sender: TObject; Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
надо организовать разные действия при нажатых Shift, ctrl и т.д.
Что-то не могу понять как if или case записать.
Shift=ssShift не канает, ssShift in Shift канает но не выполняется.


 
MBo ©   (2007-08-30 08:10) [1]

Handled := True; поставь
иначе возникают два события, и во втором Shift меняется


 
Vitaliy_____   (2007-08-30 08:18) [2]

Понятно, помогло. Спасибо.



Страницы: 1 вся ветка

Текущий архив: 2007.09.23;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.022 c
15-1187936776
palva
2007-08-24 10:26
2007.09.23
Конференция Начинающим


15-1187945267
Nic (from server)
2007-08-24 12:47
2007.09.23
Ещё одна проблема с web-сервером


9-1143015328
Nic
2006-03-22 11:15
2007.09.23
Шейдеры: с чего начать?


2-1188173770
HF-Trade
2007-08-27 04:16
2007.09.23
Инвертировать мышь по оси Y


2-1188485653
пАзер
2007-08-30 18:54
2007.09.23
изменение рисунка рабочего стола