Текущий архив: 2005.01.23;
Скачать: CL | DM;
Вниз
был ли нажат CTRL ? Найти похожие ветки
← →
redlord (2005-01-11 22:03) [0]всем привет
народ как узнать был ли нажат CTRL
я пробовал делать как показано ниже
но компилятор ругается на ssctrl
(не тот тип)
как это зделать правильно ??
procedure TForm1.Memo2KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (shift = ssctrl ) and( key = 13) then showmessage("ок");
end;
← →
Palladin © (2005-01-11 22:04) [1]ssctrl in shift
← →
Gero © (2005-01-11 22:40) [2]
> shift = ssctrl
Shift это множество, а ssCtrl — значение перечисляемого типа.
← →
redlord (2005-01-11 23:09) [3]спасибо
ssctrl in shift
то что нужно
Страницы: 1 вся ветка
Текущий архив: 2005.01.23;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.059 c
