Nadgil Posted January 20, 2004 Report Share Posted January 20, 2004 Подскажите как сделать так, чтобы прога управлялась с клвавы, я не могу даже по эскепу выходить. Где нужно описывать процедуру и как, если можно по подробнее. Есть каки-нить идеи по отключению комбинаций тип ctlr+Alt+Del, Alt+Tab, Alt+Esc... в ХР? Link to comment Share on other sites More sharing options...
aTeos Posted January 20, 2004 Report Share Posted January 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/ и еще здесь Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now