hedgewars/hwengine.pas
changeset 7286 068adc6948e3
parent 7235 baa69bd025d9
child 7306 3cff5c769509
equal deleted inserted replaced
7284:24c6fa591866 7286:068adc6948e3
   358 
   358 
   359     WriteToConsole('Init SDL_ttf... ');
   359     WriteToConsole('Init SDL_ttf... ');
   360     SDLTry(TTF_Init() <> -1, true);
   360     SDLTry(TTF_Init() <> -1, true);
   361     WriteLnToConsole(msgOK);
   361     WriteLnToConsole(msgOK);
   362 
   362 
       
   363 {$IFDEF USE_VIDEO_RECORDING}
   363     if GameType = gmtRecord then
   364     if GameType = gmtRecord then
   364         InitOffscreenOpenGL()
   365         InitOffscreenOpenGL()
   365     else
   366     else
       
   367 {$ENDIF}
   366         begin            
   368         begin            
   367         // show main window
   369         // show main window
   368         if cFullScreen then
   370         if cFullScreen then
   369             ParseCommand('fullscr 1', true)
   371             ParseCommand('fullscr 1', true)
   370         else
   372         else
   413     InitSound();
   415     InitSound();
   414 
   416 
   415     isDeveloperMode:= false;
   417     isDeveloperMode:= false;
   416     TryDo(InitStepsFlags = cifAllInited, 'Some parameters not set (flags = ' + inttostr(InitStepsFlags) + ')', true);
   418     TryDo(InitStepsFlags = cifAllInited, 'Some parameters not set (flags = ' + inttostr(InitStepsFlags) + ')', true);
   417     ParseCommand('rotmask', true);
   419     ParseCommand('rotmask', true);
   418     
   420 
   419 {$IFDEF USE_VIDEO_RECORDING}
   421 {$IFDEF USE_VIDEO_RECORDING}
   420     if GameType = gmtRecord then
   422     if GameType = gmtRecord then
   421         RecorderMainLoop()
   423         RecorderMainLoop()
   422     else
   424     else
   423 {$ENDIF}
   425 {$ENDIF}
   502         uChat.freeModule;
   504         uChat.freeModule;
   503         uAmmos.freeModule;
   505         uAmmos.freeModule;
   504         //uAIAmmoTests does not need to be freed
   506         //uAIAmmoTests does not need to be freed
   505         //uAIActions does not need to be freed
   507         //uAIActions does not need to be freed
   506         uStore.freeModule;
   508         uStore.freeModule;
   507         uVideoRec.freeModule;
   509 {$IFDEF USE_VIDEO_RECORDING}uVideoRec.freeModule;{$ENDIF}
   508     end;
   510     end;
   509 
   511 
   510     uIO.freeModule;
   512     uIO.freeModule;
   511     uLand.freeModule;
   513     uLand.freeModule;
   512     uLandPainted.freeModule;
   514     uLandPainted.freeModule;