Advertisement
DestBro

Untitled

Sep 19th, 2016
109
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.91 KB | None | 0 0
  1. import base.win; //примитивы с окнами
  2. import base.gui; //гуишные контролы
  3. import std.io;//нужен enum VK
  4. import Network;
  5. bool a = true;
  6. void eventHotKey(Dialog ref dlg, int param)//функция вызывается когда срабатывает хоткей
  7. {
  8. if(!a)
  9. {
  10. Beep(1000, 400);
  11. }
  12. else
  13. {
  14. Beep(1000, 100);
  15. }
  16. a =! a;
  17. }
  18. void closeDlg(Dialog ref Dialog, int param){}//вызывается при закрытии
  19. Dialog ref testDlg = CreateDialog("Test hotkey", 200, 200, 300, 200, closeDlg);
  20. testDlg.AddHotKey('Q', false, false, false, eventHotKey, 1);//Зарегистрируем хоткей Q
  21. testDlg.AddStatic("Нажмите кнопку Q", 15, 20, 200, 200);
  22. testDlg.Show(true);//Показать диалог
  23. testDlg.OnTop(1);
  24. testDlg.WaitClose();//ждем закрытия диалога
  25. return 0;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement