Главная страница
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.015 c
2-1188337772
w666w
2007-08-29 01:49
2007.09.23
Как ассоциировать определенное разрешение файла с приложением?


2-1188196280
megre
2007-08-27 10:31
2007.09.23
DRIVE_REMOTE


2-1188456476
vasyl
2007-08-30 10:47
2007.09.23
ProgressBar


15-1188204801
ocean
2007-08-27 12:53
2007.09.23
Как сохранить документы?


3-1179649816
PaintenZero
2007-05-20 12:30
2007.09.23
Создание XLS БД