Форум: "Начинающим";
Текущий архив: 2007.09.23;
Скачать: [xml.tar.bz2];
Вниз
Проверка клавиш сдвига Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.046 c
