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/ и еще здесь Ссылка на комментарий Поделиться на другие сайты Поделиться
Рекомендуемые сообщения
Для публикации сообщений создайте учётную запись или авторизуйтесь
Вы должны быть пользователем, чтобы оставить комментарий
Создать учетную запись
Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!
Регистрация нового пользователяВойти
Уже есть аккаунт? Войти в систему.
Войти