less hints

lazpaint/quote.inc

@@ -228,7 +228,6 @@ const
   StringDelimiter = StringDelimiter1;
   EscapeChars = [#0,#7..#13,#26,#27,'\',StringDelimiter];
 var i, j, count: integer;
-  inQuote: boolean;
 
   procedure FlushChars;
   var NbFlush: integer;
@@ -241,7 +240,6 @@ var i, j, count: integer;
 
 begin
   result := StringDelimiter;
-  inQuote := false;
   count := length(s);
   i := 0;
   j := 0;

lazpaint/tools/utoolbasic.pas

@@ -18,9 +18,9 @@ type
     handOriginF: TPointF;
     function FixSelectionTransform: boolean; override;
     function FixLayerOffset: boolean; override;
-    function DoToolDown({%H-}toolDest: TBGRABitmap; pt: TPoint; {%H-}ptF: TPointF;
+    function DoToolDown({%H-}toolDest: TBGRABitmap; {%H-}pt: TPoint; ptF: TPointF;
       {%H-}rightBtn: boolean): TRect; override;
-    function DoToolMove({%H-}toolDest: TBGRABitmap; pt: TPoint; {%H-}ptF: TPointF): TRect; override;
+    function DoToolMove({%H-}toolDest: TBGRABitmap; {%H-}pt: TPoint; ptF: TPointF): TRect; override;
     function GetStatusText: string; override;
   public
     constructor Create(AManager: TToolManager); override;

lazpaint/tools/utoollayer.pas

@@ -25,9 +25,9 @@ type
     FLayerBounds: TRect;
     FLayerBoundsDefined: boolean;
     function GetIsSelectingTool: boolean; override;
-    function DoToolDown({%H-}toolDest: TBGRABitmap; pt: TPoint; {%H-}ptF: TPointF;
+    function DoToolDown({%H-}toolDest: TBGRABitmap; {%H-}pt: TPoint; ptF: TPointF;
       {%H-}rightBtn: boolean): TRect; override;
-    function DoToolMove({%H-}toolDest: TBGRABitmap; pt: TPoint; {%H-}ptF: TPointF): TRect; override;
+    function DoToolMove({%H-}toolDest: TBGRABitmap; {%H-}pt: TPoint; ptF: TPointF): TRect; override;
     function UseOriginal: boolean;
     procedure NeedLayerBounds;
     function GetAction: TLayerAction; override;

lazpaint/tools/utoolselect.pas

@@ -103,9 +103,9 @@ type
     handMoving, snapToPixel: boolean;
     handOriginF: TPointF;
     selectionTransformBefore: TAffineMatrix;
-    function DoToolDown({%H-}toolDest: TBGRABitmap; pt: TPoint; {%H-}ptF: TPointF;
+    function DoToolDown({%H-}toolDest: TBGRABitmap; {%H-}pt: TPoint; ptF: TPointF;
       {%H-}rightBtn: boolean): TRect; override;
-    function DoToolMove({%H-}toolDest: TBGRABitmap; pt: TPoint; {%H-}ptF: TPointF): TRect; override;
+    function DoToolMove({%H-}toolDest: TBGRABitmap; {%H-}pt: TPoint; ptF: TPointF): TRect; override;
   public
     constructor Create(AManager: TToolManager); override;
     function ToolUp: TRect; override;