Update UEncoding.pas

src/core/UEncoding.pas

@@ -15,6 +15,10 @@ unit UEncoding;
   THIS LICENSE HEADER MUST NOT BE REMOVED.
 }
 
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
+
 interface
 
 uses