equal
deleted
inserted
replaced
194 SDL_FillRect(resSurface, @dstrect, shadowint); |
194 SDL_FillRect(resSurface, @dstrect, shadowint); |
195 |
195 |
196 // create and blit text |
196 // create and blit text |
197 strSurface:= TTF_RenderUTF8_Blended(Fontz[font].Handle, Str2PChar(str), cl.color); |
197 strSurface:= TTF_RenderUTF8_Blended(Fontz[font].Handle, Str2PChar(str), cl.color); |
198 //SDL_UpperBlit(strSurface, nil, resSurface, @dstrect); |
198 //SDL_UpperBlit(strSurface, nil, resSurface, @dstrect); |
199 if strSurface <> nil then copyTOXY(strSurface, resSurface, Padding, Padding); |
199 if strSurface <> nil then copyToXY(strSurface, resSurface, Padding, Padding); |
200 SDL_FreeSurface(strSurface); |
200 SDL_FreeSurface(strSurface); |
201 |
201 |
202 cl.Tex:= Surface2Tex(resSurface, false); |
202 cl.Tex:= Surface2Tex(resSurface, false); |
203 |
203 |
204 SDL_FreeSurface(resSurface) |
204 SDL_FreeSurface(resSurface) |