diff --git a/lcl/intfgraphics.pas b/lcl/intfgraphics.pas
index 615b3f3d1b..3e2dc0ef4f 100644
--- a/lcl/intfgraphics.pas
+++ b/lcl/intfgraphics.pas
@@ -5049,11 +5049,11 @@ var
   BFH: TBitMapFileHeader;
 begin
   Stream.Read(BFH, SizeOf(BFH));
-  Result := (LEtoN(BFH.bfType) = BMmagic); // Just check magic number
+  Result := ({$ifdef FPC_LITTLE_ENDIAN}LEtoN{$endif}(BFH.bfType) = BMmagic); // Just check magic number
 
   // store the data offset
   if Result and (BFH.bfOffBits <> 0)
-  then FDataOffset := Stream.Position + LEtoN(BFH.bfOffBits) - SizeOf(BFH);
+  then FDataOffset := Stream.Position + {$ifdef FPC_LITTLE_ENDIAN}LEtoN{$endif}(BFH.bfOffBits) - SizeOf(BFH);
 end;
 
 procedure TLazReaderBMP.InternalReadHead;