Преглед на файлове

ctrl for right click on macos

circular17 преди 6 години
родител
ревизия
0868e7608d
променени са 1 файла, в които са добавени 3 реда и са изтрити 1 реда
  1. 3 1
      lazpaint/lazpaintmainform.pas

+ 3 - 1
lazpaint/lazpaintmainform.pas

@@ -1160,7 +1160,9 @@ begin
     btnMiddleDown:= true;
     if not ToolManager.ToolSleeping and not (ssAlt in Shift) then ToolManager.ToolSleep;
   end;
-  if ToolManager.ToolDown(FImageView.FormToBitmap(X,Y),btnRightDown,CurrentPressure) then
+  if ToolManager.ToolDown(FImageView.FormToBitmap(X,Y),
+      btnRightDown{$IFDEF DARWIN} or (ssCtrl in Shift){$ENDIF},
+      CurrentPressure) then
       PaintPictureNow;
   UpdateToolbar;
 end;