899 end;

   899 end;

   900 

   900 

   901 function  LoadImage(const filename: string; imageFlags: Integer): PSDL_Surface;

   901 function  LoadImage(const filename: string; imageFlags: Integer): PSDL_Surface;

   902 var tmpsurf: PSDL_Surface;

   902 var tmpsurf: PSDL_Surface;

   903     s: shortstring;

   903     s: shortstring;

   905     convertedSurf: PSDL_Surface;

   904     convertedSurf: PSDL_Surface;

   907 begin

   905 begin

   908 WriteToConsole(msgLoading + filename + '... ');

   906 WriteToConsole(msgLoading + filename + '... ');

   909 

   907 

   910 s:= filename + '.png';

   908 s:= filename + '.png';

   911 tmpsurf:= IMG_Load(Str2PChar(s));

   909 tmpsurf:= IMG_Load(Str2PChar(s));