Текущий архив: 2002.06.10;
Скачать: CL | DM;
Вниз
Delphi Общие вопросы (клавиатура) 30.05.2002 Найти похожие ветки
← →
eda (2002-05-30 14:56) [0]Подскажите, как программно отличить нажатие на клавиатуре
правого и левого Shift, Alt, Ctrl?
← →
Fredericco © (2002-05-30 14:59) [1]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
end;
где
TShiftState = set of (ssShift, ssAlt, ssCtrl,
ssLeft, ssRight, ssMiddle, ssDouble);
Проверяешь
if Shift=[ssShift] then
← →
Fredericco © (2002-05-30 15:01) [2]Сорри не то ляпнул. Вопрос не внимательно прочитал
← →
Kozhanov © (2002-05-30 15:04) [3]> eda
Посмотри константы
VK_LSHIFT, VK_RSHIFT... в модуле Windows.pas
← →
eda (2002-05-31 12:56) [4]Эти константы мне известны, но, к сожалению , функции WinAPI непонятно как идентифицируют VK_LSHIFT и VK_RSHIFT (В обоих случаях результат 0)
Страницы: 1 вся ветка
Текущий архив: 2002.06.10;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.012 c
