equal
deleted
inserted
replaced
415 FPS:= Frames; |
415 FPS:= Frames; |
416 Frames:= 0; |
416 Frames:= 0; |
417 CountTicks:= 0; |
417 CountTicks:= 0; |
418 s:= inttostr(FPS) + ' fps'; |
418 s:= inttostr(FPS) + ' fps'; |
419 if fpsTexture <> nil then FreeTexture(fpsTexture); |
419 if fpsTexture <> nil then FreeTexture(fpsTexture); |
|
420 {$IFNDEF IPHONE} |
420 tmpSurface:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(s), $FFFFFF); |
421 tmpSurface:= TTF_RenderUTF8_Blended(Fontz[fnt16].Handle, Str2PChar(s), $FFFFFF); |
|
422 {$ENDIF} |
421 fpsTexture:= Surface2Tex(tmpSurface); |
423 fpsTexture:= Surface2Tex(tmpSurface); |
422 SDL_FreeSurface(tmpSurface) |
424 SDL_FreeSurface(tmpSurface) |
423 end; |
425 end; |
424 if fpsTexture <> nil then |
426 if fpsTexture <> nil then |
425 DrawTexture(cScreenWidth - 50, 10, fpsTexture); |
427 DrawTexture(cScreenWidth - 50, 10, fpsTexture); |