summaryrefslogtreecommitdiff
path: root/docview/src
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2011-08-24 12:10:26 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2011-08-24 12:10:26 +0200
commitf68bbb25015aadee0a48c560dcde7eb7a9a3f0fe (patch)
treea9e7badd881b1c277eb2d04e090bdfab2ca149c5 /docview/src
parent37f449b8ddb33bda1939d69db4da2674c9abb28d (diff)
downloadfpGUI-f68bbb25015aadee0a48c560dcde7eb7a9a3f0fe.tar.xz
docview: enabled keyboard shortcuts in the File menu.
Diffstat (limited to 'docview/src')
-rw-r--r--docview/src/frm_main.pas12
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);