hedgewars/uStore.pas
changeset 4603 d362ab6c7f53
parent 4517 0618b31023dc
child 4748 ce9b48de1f52
child 4765 adef9ec50d63
equal deleted inserted replaced
4600:5a3b1dbdd4c9 4603:d362ab6c7f53
   389 
   389 
   390 function  LoadImage(const filename: shortstring; imageFlags: LongInt): PSDL_Surface;
   390 function  LoadImage(const filename: shortstring; imageFlags: LongInt): PSDL_Surface;
   391 var tmpsurf: PSDL_Surface;
   391 var tmpsurf: PSDL_Surface;
   392     s: shortstring;
   392     s: shortstring;
   393 begin
   393 begin
   394     WriteToConsole(msgLoading + filename + '.png [flags: ' + inttostr(imageFlags) + ']');
   394     WriteToConsole(msgLoading + filename + '.png [flags: ' + inttostr(imageFlags) + '] ');
   395 
   395 
   396     s:= filename + '.png';
   396     s:= filename + '.png';
   397     tmpsurf:= IMG_Load(Str2PChar(s));
   397     tmpsurf:= IMG_Load(Str2PChar(s));
   398 
   398 
   399     if tmpsurf = nil then
   399     if tmpsurf = nil then