hedgewars/uStore.pas
changeset 13321 dd1435f1a28c
parent 13242 0171519e2f13
parent 12900 c77d75dafe2e
child 13348 93325e13d329
equal deleted inserted replaced
13320:3546bb36c8fb 13321: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