Вниз
Скачать: CL | DM;

Hot key в TRichEdit.   Найти похожие ветки 

← →
..::KraN::..   (2007-12-13 22:41) [0]

Как в TMemo перехватить нажатие, например, Ctrl+F и показать сообщение (ShowMessage). Пробовал так, но не работает:
 
If (ssalt in Shift) or (key=224) then
   Form2.Show;  


← →
Free_Breeze   (2007-12-14 03:15) [1]

procedure TForm1.Memo1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
 if key=224 then Form2.Show;
end;

В твоем случае Ctrl+F - это 70
можешь добавить Label1.Caption:=inttostr(Key); для разнообразия


← →
Gydvin ©   (2007-12-14 05:31) [2]


> Free_Breeze   (14.12.07 03:15) [1]
>В твоем случае Ctrl+F - это 70


Не верно.


> ..::KraN::..

смотри
http://delphimaster.net/view/2-1197386963/

F and f = 70



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
2-1197382972
@!!ex
2007-12-11 17:22
2008.01.13
Окно перетащили к краю экрана.


2-1197378358
9899100
2007-12-11 16:05
2008.01.13
замена конструктора


15-1197121001
тестмессаге
2007-12-08 16:36
2008.01.13
Что не хватает файлу от ФоксПро?


15-1197112397
tButton
2007-12-08 14:13
2008.01.13
Опера =)


15-1197116679
FEEEEEE
2007-12-08 15:24
2008.01.13
Ищу название фильма




   Наверх