Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.26;
Скачать: CL | DM;

Вниз

Fps   Найти похожие ветки 

 
D@rk   (2006-02-06 22:38) [0]

Использую OpenGL...
Подскажите пожалуйста как посчитать Fps...


 
grouzd[E]v ©   (2006-02-06 23:05) [1]

var
count_new, count_last, count_sec, fps : integer;

procedure Render;
count_new := GetTickCount;

fps := fps + 1;
if (count_new - count_sec) >= 1000 then
 begin
   count_sec := count_sec + 1000;
   fps_string := "fps: "+inttostr(fps);
   fps := 0;
 end;
global_count := count_new - count_last;

//рисуем сцену
//получаем fps - в строке fps_string

count_last := count_new;
end;

---
... we are walking on a thin line and you better avoid the risk ...



Страницы: 1 вся ветка

Текущий архив: 2006.11.26;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.079 c
15-1163092863
TUser
2006-11-09 20:21
2006.11.26
Размер djvu


3-1158961120
_Ламер_
2006-09-23 01:38
2006.11.26
Избыточность


2-1162884249
312kbps
2006-11-07 10:24
2006.11.26
Image SQL2000


15-1162622446
ArtemESC
2006-11-04 09:40
2006.11.26
Установка FreeBSD


15-1162921165
Eraser
2006-11-07 20:39
2006.11.26
Сделаем Delphi лучше