Как, используя маску, сбросить определенный бит (записать в него

254

296

Посмотреть ответы 1

Ответы на вопрос:

kondratenkoari1

Информатика

4,7(57 оценок)

насколько я знаю в любой сборке delphi есть компонент "application events", у которго есть соответствующее событие "onshortcut", так вот разместите на форме данный компонент (в 7 версии delphi он должен лежать во вкладке "additional") и запишите в его свостве onshortcut следующее:

procedure tform1.applicationevents1shortcut(var msg: twmkey; var handled: boolean); beginif msg.charcode = ord('g') thenform1.close; end;

ord('g') - функция возвращающая код символа, в её параметр записывайте непосредственно тот символ, по нажатию которого должна прекратить работу ваша программа.