diff --git a/packages/fcl-image/src/fpreadxpm.pp b/packages/fcl-image/src/fpreadxpm.pp
index ba1a9b71b6..aefdbf93df 100644
--- a/packages/fcl-image/src/fpreadxpm.pp
+++ b/packages/fcl-image/src/fpreadxpm.pp
@@ -300,6 +300,7 @@ begin
       end;
     ParseFirstLine;
     Img.SetSize (width, height);
+    Img.UsePalette := True;
     ReadPalette;
     ReadData;
   finally