Главная страница
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.03 c
2-1162806595
stdctrls
2006-11-06 12:49
2006.11.26
Предача vcl контроллов в процедуру


3-1159010897
Mate
2006-09-23 15:28
2006.11.26
Как сохранить (или конвертировать) базу с Unicod ом в формате Acc


2-1162826267
312Kbps
2006-11-06 18:17
2006.11.26
Handle and OLE !


2-1162987359
Димыч
2006-11-08 15:02
2006.11.26
Поверх всех окон


3-1159290756
Shaman_
2006-09-26 21:12
2006.11.26
работа в SQL запросах с DATETIME полями как с EXTENDED