diff --git a/components/freetype/easylazfreetype.pas b/components/freetype/easylazfreetype.pas
index 7cc091ef60..b776054001 100644
--- a/components/freetype/easylazfreetype.pas
+++ b/components/freetype/easylazfreetype.pas
@@ -902,7 +902,7 @@ begin
                   rect.left, rect.top, rect.right-rect.left, rect.bottom-rect.top,
                   OnRender, ARasterizer) = TT_Err_Ok;
   else
-    result := false;
+    result := false{%H-};
   end;
 end;
 
diff --git a/components/freetype/ttraster.pas b/components/freetype/ttraster.pas
index b55aeb4a95..94e2f97734 100644
--- a/components/freetype/ttraster.pas
+++ b/components/freetype/ttraster.pas
@@ -201,7 +201,7 @@ type
                                 x,y,tx,ty: integer;
                                 OnRender: TDirectRenderingFunction) : TError; override;
 
-    procedure Set_Raster_Palette(const palette: TT_Gray_Palette); override;
+    procedure Set_Raster_Palette(const {%H-}palette: TT_Gray_Palette); override;
 
     constructor Create;
     destructor Destroy; override;