hedgewars/uStore.pas
branchsdl2transition
changeset 11373 011c5cc195cc
parent 11367 a91c4c4fd85c
child 11408 55fc715435ea
equal deleted inserted replaced
11372:208bc571f949 11373:011c5cc195cc
  1082 
  1082 
  1083     if SDLwindow = nil then
  1083     if SDLwindow = nil then
  1084         SDLwindow:= SDL_CreateWindow(PChar('Hedgewars'), x, y, cScreenWidth, cScreenHeight, flags);
  1084         SDLwindow:= SDL_CreateWindow(PChar('Hedgewars'), x, y, cScreenWidth, cScreenHeight, flags);
  1085     SDLTry(SDLwindow <> nil, 'SDL_CreateWindow', true);
  1085     SDLTry(SDLwindow <> nil, 'SDL_CreateWindow', true);
  1086 
  1086 
       
  1087     // load engine ico
       
  1088     {$IFNDEF DARWIN}
       
  1089     ico:= LoadDataImage(ptGraphics, 'hwengine', ifIgnoreCaps);
       
  1090     if ico <> nil then
       
  1091         begin
       
  1092         SDL_SetWindowIcon(SDLwindow, ico);
       
  1093         SDL_FreeSurface(ico);
       
  1094         end;
       
  1095     {$ENDIF}
  1087     SetupOpenGL();
  1096     SetupOpenGL();
  1088 
  1097 
  1089     if reinit then
  1098     if reinit then
  1090         begin
  1099         begin
  1091         // clean the window from any previous content
  1100         // clean the window from any previous content