diff options
author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-08-24 12:10:26 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2011-08-24 12:10:26 +0200 |
commit | f68bbb25015aadee0a48c560dcde7eb7a9a3f0fe (patch) | |
tree | a9e7badd881b1c277eb2d04e090bdfab2ca149c5 /docview/src | |
parent | 37f449b8ddb33bda1939d69db4da2674c9abb28d (diff) | |
download | fpGUI-f68bbb25015aadee0a48c560dcde7eb7a9a3f0fe.tar.xz |
docview: enabled keyboard shortcuts in the File menu.
Diffstat (limited to 'docview/src')
-rw-r--r-- | docview/src/frm_main.pas | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/docview/src/frm_main.pas b/docview/src/frm_main.pas index 7fd4ea21..4630ea6f 100644 --- a/docview/src/frm_main.pas +++ b/docview/src/frm_main.pas @@ -3034,15 +3034,15 @@ begin begin Name := 'miFile'; SetPosition(292, 96, 132, 20); - AddMenuItem('Open...', '', @miFileOpenClicked); - AddMenuItem('Open additional file...', '', @miFileOpenAdditionalFileClicked); - AddMenuItem('Open Special...', '', @miFileOpenSpecialClicked); - AddMenuItem('Save current Topic to IPF...', '', @miFileSaveTopicAsIPF); - AddMenuItem('Close', '', @miFileCloseClicked); + AddMenuItem('Open...', 'Ctrl+O', @miFileOpenClicked); + AddMenuItem('Open additional file...', 'Ctrl+Shift+O', @miFileOpenAdditionalFileClicked); + AddMenuItem('Open Special...', 'Ctrl+L', @miFileOpenSpecialClicked); + AddMenuItem('Save current Topic to IPF...', 'Ctrl+S', @miFileSaveTopicAsIPF); + AddMenuItem('Close', 'Ctrl+W', @miFileCloseClicked); AddMenuitem('-', '', nil); FFileOpenRecent := AddMenuItem('Open Recent...', '', nil); AddMenuitem('-', '', nil); - AddMenuItem('Quit', '', @miFileQuitClicked); + AddMenuItem('Quit', 'Ctrl+Q', @miFileQuitClicked); end; miSettings := TfpgPopupMenu.Create(self); |