浏览代码

Ctrl-Y alternative to undo

Juliette ELSASS 1 年之前
父节点
当前提交
7910760f0e
共有 1 个文件被更改,包括 6 次插入0 次删除
  1. 6 0
      lazpaint/lazpaintmainform.pas

+ 6 - 0
lazpaint/lazpaintmainform.pas

@@ -1901,6 +1901,12 @@ begin
       if EditDeselect.Execute then
         Key := 0;
     end else
+    if (Key = VK_Y) and snapPressed and EditRedo.Enabled then
+    begin
+      EditRedo.Execute;
+      Key := 0;
+    end
+    else
     if LazPaintInstance.ImageListWindowVisible then
       LazPaintInstance.ImageListWindowVisibleKeyDown(Key,Shift);
     If Key = 0 then UpdateToolbar;