hedgewars/CCHandlers.inc
changeset 1525 311d0ab35d98
parent 1379 39cfee7a5be5
child 1639 89b536a3cf3c
equal deleted inserted replaced
1524:5a652a465559 1525:311d0ab35d98
   479 	end
   479 	end
   480 	else SDL_WM_SetCaption('Hedgewars', nil);
   480 	else SDL_WM_SetCaption('Hedgewars', nil);
   481 {$IFDEF DEBUGFILE}
   481 {$IFDEF DEBUGFILE}
   482 AddFileLog('Freeing old primary surface...');
   482 AddFileLog('Freeing old primary surface...');
   483 {$ENDIF}
   483 {$ENDIF}
   484 SDL_FreeSurface(SDLPrimSurface);
   484 if SDLPrimSurface <> nil then SDL_FreeSurface(SDLPrimSurface);
   485 
   485 
   486 SDLPrimSurface:= SDL_SetVideoMode(cScreenWidth, cScreenHeight, cBits, flags);
   486 SDLPrimSurface:= SDL_SetVideoMode(cScreenWidth, cScreenHeight, cBits, flags);
   487 SDLTry(SDLPrimSurface <> nil, true);
   487 SDLTry(SDLPrimSurface <> nil, true);
   488 
   488 
   489 {$IFDEF DEBUGFILE}
   489 {$IFDEF DEBUGFILE}