equal
deleted
inserted
replaced
1690 if CountTicks >= 1000 then |
1690 if CountTicks >= 1000 then |
1691 begin |
1691 begin |
1692 FPS:= Frames; |
1692 FPS:= Frames; |
1693 Frames:= 0; |
1693 Frames:= 0; |
1694 CountTicks:= 0; |
1694 CountTicks:= 0; |
1695 s:= Format(trmsg[sidFPS], inttostr(FPS)); |
1695 s:= Format(shortstring(trmsg[sidFPS]), inttostr(FPS)); |
1696 tmpSurface:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(s), cWhiteColorChannels); |
1696 tmpSurface:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(s), cWhiteColorChannels); |
1697 tmpSurface:= doSurfaceConversion(tmpSurface); |
1697 tmpSurface:= doSurfaceConversion(tmpSurface); |
1698 FreeAndNilTexture(fpsTexture); |
1698 FreeAndNilTexture(fpsTexture); |
1699 fpsTexture:= Surface2Tex(tmpSurface, false); |
1699 fpsTexture:= Surface2Tex(tmpSurface, false); |
1700 SDL_FreeSurface(tmpSurface) |
1700 SDL_FreeSurface(tmpSurface) |