Форум: "Начинающим";
Текущий архив: 2014.06.08;
Скачать: [xml.tar.bz2];
ВнизОпределить нажатие кнопки Найти похожие ветки
← →
i2e (2013-08-16 12:38) [0]Как отловить событие нажатия кнопки, в главной форме? Событие формы OnKeyDown не вызывается когда фокус находится на каком-либо элементе, например, в строке Edit.
И когда-то уже такое делал, а как - вспомнить не могу..
← →
[ВладОшин] © (2013-08-16 13:11) [1]KeyPreview
← →
i2e (2013-08-16 13:23) [2]нарыл на форуме http://rpdn.ru/forum/25/198/
type
TForm1 = class(TForm)
...
procedure OnTABPress(Var Msg: TWMKey); message CM_DIALOGKEY;
...
procedure TForm1.OnTABPress(Var Msg: TWMKEY);
begin
if (ActiveControl is TEdit) and (Msg.Charcode = VK_TAB) then ShowMessage("Нажата клавиша TAB");
inherited;
end;
Проверил, работает.
← →
ProgRAMmer Dimonych © (2013-08-16 13:48) [3]> [2] i2e (16.08.13 13:23)
А мусьи там знают толк.
← →
[ВладОшин] © (2013-08-16 14:06) [4]да, с ТАБ, походу, только так
можно посмотреть как в TCustomForm реализовано (почти также :)
т.е.
public { Public declarations }
procedure CMDialogKey(var Message: TCMDialogKey); message CM_DIALOGKEY;
end;
← →
[ВладОшин] © (2013-08-16 14:06) [5]а зачем, кстати это надо может быть вообще?
← →
stas © (2013-08-16 17:24) [6]Можно использовать ActionList и не морочить голову.
← →
i2e (2013-08-19 06:41) [7]свойство KeyPreview - в моем случае оказался самый простой к реализации вариант.
его и оставил. всё получилось.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2014.06.08;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.001 c