Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.024 c
1-1104673774
Igor_thief
2005-01-02 16:49
2005.01.23
Оптимальность


1-1104743119
TeNY
2005-01-03 12:05
2005.01.23
Полезная програ для работы в Delhpi Easy Bufer v1.01


14-1105145875
Kerk
2005-01-08 03:57
2005.01.23
вот.. нашел баг в форуме и клиенте...


1-1104859779
Кодер
2005-01-04 20:29
2005.01.23
Мерцание компонент


1-1105385578
Anonimus
2005-01-10 22:32
2005.01.23
Вопрос по TListView