Nadgil Опубликовано 20 января, 2004 Жалоба Поделиться Опубликовано 20 января, 2004 Подскажите как сделать так, чтобы прога управлялась с клвавы, я не могу даже по эскепу выходить. Где нужно описывать процедуру и как, если можно по подробнее. Есть каки-нить идеи по отключению комбинаций тип ctlr+Alt+Del, Alt+Tab, Alt+Esc... в ХР? Цитата Ссылка на комментарий Поделиться на другие сайты Поделиться
aTeos Опубликовано 20 января, 2004 Жалоба Поделиться Опубликовано 20 января, 2004 procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_ESCAPE then Close; end; Это закрывает форму по нажатию Escape. Значит по форме щелкни и в Object Inspector на вкладке Events два раза щелкни справа от OnKeyDown. Появится окошко с кодом. Впиши туда то, что я выделил жирненьким... Запускай прогу и жми Escape. Если хочешь посмотреть коды других клавиш, то установи курсор на VK_ESCAPE и жми F1. P.S. http://delphibase.endimus.com/ http://delphi.mastak.ru/ и еще здесь Цитата Ссылка на комментарий Поделиться на другие сайты Поделиться
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.