hedgewars/uChat.pas
changeset 2619 bc2786a00fb8
parent 2518 126850aec94d
child 2622 39932161194e
equal deleted inserted replaced
2618:23ee71bd049b 2619:bc2786a00fb8
    82 		toPowerOf2(h),
    82 		toPowerOf2(h),
    83 		32,
    83 		32,
    84 		RMask, GMask, BMask, AMask);
    84 		RMask, GMask, BMask, AMask);
    85 
    85 
    86 strSurface:= TTF_RenderUTF8_Solid(Fontz[fnt16].Handle, Str2PChar(str), color);
    86 strSurface:= TTF_RenderUTF8_Solid(Fontz[fnt16].Handle, Str2PChar(str), color);
       
    87 //strSurface:= doSurfaceConversion(strSurface);
    87 cl.Width:= w + 4;
    88 cl.Width:= w + 4;
    88 SDL_UpperBlit(strSurface, nil, resSurface, nil);
    89 SDL_UpperBlit(strSurface, nil, resSurface, nil);
    89 SDL_FreeSurface(strSurface);
    90 SDL_FreeSurface(strSurface);
    90 
    91 
    91 cl.Time:= RealTicks + 12500;
    92 cl.Time:= RealTicks + 12500;