diff --git a/components/projectgroups/projectgroupeditor.pas b/components/projectgroups/projectgroupeditor.pas
index a1bbea8b02..566741ab1c 100644
--- a/components/projectgroups/projectgroupeditor.pas
+++ b/components/projectgroups/projectgroupeditor.pas
@@ -749,19 +749,39 @@ end;
 procedure TProjectGroupEditorForm.TVPGKeyDown(Sender: TObject; var Key: Word;
   Shift: TShiftState);
 begin
-  if Shift=[ssCtrl] then
-    case Key of
-      VK_UP:
-      begin
-        TBTargetUp.Click;
-        Key := 0;
-      end;
-      VK_DOWN:
-      begin
-        TBTargetLater.Click;
-        Key := 0;
-      end;
+  case Key of
+    VK_RETURN:
+    begin
+      TVPGDblClick(Sender);
+      Key := 0;
     end;
+    VK_F5:
+    begin
+      TBReload.Click;
+      Key := 0;
+    end;
+    VK_UP:
+    if Shift=[ssCtrl] then
+    begin
+      TBTargetUp.Click;
+      Key := 0;
+    end;
+    VK_DOWN:
+    if Shift=[ssCtrl] then
+    begin
+      TBTargetLater.Click;
+      Key := 0;
+    end;
+    Ord('S'):
+    begin
+      if Shift=[ssCtrl] then
+        TBSave.Click
+      else
+      if Shift=[ssCtrl, ssShift] then
+        PMISaveAs.Click;
+      Key := 0;
+    end;
+  end;
 end;
 
 procedure TProjectGroupEditorForm.TVPGMouseDown(Sender: TObject;