Focus and Blur events for windows

This commit is contained in:
David Botton 2021-02-17 17:16:22 -05:00
parent bfdd90d42e
commit c1b6da0b5d
3 changed files with 50 additions and 2 deletions

View file

@ -37,6 +37,7 @@
(let* ((menu (create-gui-menu-bar body))
(tmp (create-gui-menu-icon menu :on-click #'on-help-about))
(file (create-gui-menu-drop-down menu :content "File"))
(tmp (create-gui-menu-drop-down menu :content "Open Database Connection"))
(win (create-gui-menu-drop-down menu :content "Window"))
(tmp (create-gui-menu-item win :content "Maximize All" :on-click #'maximize-all-windows))
(tmp (create-gui-menu-item win :content "Normalize All" :on-click #'normalize-all-windows))