hedgewars/uStore.pas
changeset 13316 dd1435f1a28c
parent 13237 0171519e2f13
parent 12895 c77d75dafe2e
child 13343 93325e13d329
equal deleted inserted replaced
13315:3546bb36c8fb 13316:dd1435f1a28c
   823             if GameLoading <> nil then
   823             if GameLoading <> nil then
   824                 GameLoading();
   824                 GameLoading();
   825         {$ENDIF}
   825         {$ENDIF}
   826         end;
   826         end;
   827 
   827 
   828     if checkFails(ProgrTex <> nil, 'Error - Progress Texure is nil!', true) then exit;
   828     if checkFails((ProgrTex <> nil) and (LoadingText <> nil), 'Error - Progress or Loading Texture is nil!', true) then exit;
   829 
   829 
   830     RenderClear();
   830     RenderClear();
   831     if Step < numsquares then
   831     if Step < numsquares then
   832         r.x:= 0
   832         r.x:= 0
   833     else
   833     else