Explorar o código

avoid mouseup glitch

Johann %!s(int64=6) %!d(string=hai) anos
pai
achega
be2284242d
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  1. 2 1
      lazpaint/lazpaintmainform.pas

+ 2 - 1
lazpaint/lazpaintmainform.pas

@@ -1225,10 +1225,11 @@ var redraw: boolean;
 begin
   if not Assigned(FImageView) then exit;
 
-  redraw := ToolManager.ToolMove(FImageView.FormToBitmap(X,Y),CurrentPressure);
+  redraw := false;
   if (btnLeftDown and (Button = mbLeft)) or (btnRightDown and (Button=mbRight))
     or (btnMiddleDown and (Button = mbMiddle)) then
   begin
+    redraw := ToolManager.ToolMove(FImageView.FormToBitmap(X,Y),CurrentPressure);
     if ToolManager.ToolUp then redraw := true;
     btnLeftDown := false;
     btnRightDown := false;