hedgewars/uStore.pas
changeset 13489 8935dcc0e130
parent 13484 480ea997036b
child 13499 c41b16ac2e05
equal deleted inserted replaced
13488:dbf4f7a677be 13489:8935dcc0e130
   973 
   973 
   974 r.x:= cFontBorder + 6;
   974 r.x:= cFontBorder + 6;
   975 r.y:= cFontBorder + 4;
   975 r.y:= cFontBorder + 4;
   976 r.w:= 32;
   976 r.w:= 32;
   977 r.h:= 32;
   977 r.h:= 32;
   978 SDL_FillRect(tmpsurf, @r, $ff000000);
   978 SDL_FillRect(tmpsurf, @r, SDL_MapRGB(tmpsurf^.format, 0, 0, 0));
   979 SDL_UpperBlit(iconsurf, iconrect, tmpsurf, @r);
   979 SDL_UpperBlit(iconsurf, iconrect, tmpsurf, @r);
   980 
   980 
   981 RenderHelpWindow:=  Surface2Tex(tmpsurf, true);
   981 RenderHelpWindow:=  Surface2Tex(tmpsurf, true);
   982 SDL_FreeSurface(tmpsurf)
   982 SDL_FreeSurface(tmpsurf)
   983 end;
   983 end;