[DIRECTX 9.0 - Delphi] Timer irregulie

Version imprimable

Bonjour,
Je entrain de voir pou realiser un timer en directx en me basant sur le environnement.get_tickcount.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 if Environment.get_TickCount mod 1000 = 0 then // on recupere le temps en milliseconde// begin tmptime := tmptime - 1 ; if tmptime = 0 then begin tmptime := 59; min := min - 1; end; end;
enfin la gestion du compteur marche, mais j ai des irregularites sur l incrementation et quand je fais tourner le programme sur une autre machine ca ne marche quasiment plus, la decrementation se fait par deux ne se fait plus etc ...

12/06/2007, 17h24
Albenejean

'Alut.

Citation:

Code:

if Environment.get_TickCount mod 1000 = 0 then

Tu ne sais pas à quel moment ton processeur va réaliser ce test. Il est donc possible que get_tickCount mod 1000 ne sois pas égale à zero de manière régulière.

Pour un timer:
Tu dois créer une variable qui va représenter ton temps. Tu vas incrémenter cette variable en fonction du temps écoulé entre chaque test.

ok j'ai capte, si ca interesse des gens voici ce que j ai fais :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
 
procedure timer.my_time;
begin
 
 
  if Environment.get_TickCount div 1000 > old_tickcount then
  begin
     old_tickcount := Environment.get_TickCount div 1000;
    tmptime := tmptime - 1 ;
    if tmptime = 0 then
    begin
      tmptime := 59;
      min := min - 1;
    end;
  end;
end;

merci pour ta reponse

Et tu veux pas faire un truc simple de ce genre là plutôt ?
Code:

1 2 3 4 5 6 if (old_tickcount - Environment.get_TickCount) >= 1000 then begin (* utilisation du timer *) end; old_tickcount := Environment.get_TickCount;
Après tu fqit ce que tu veux dedans... (pour compter les minutes, tu as plus simple tout de même...)

edit : ou alors si tu veux faire un truc toutes les N secondes :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 newTime := Environment.get_TickCount(); deltaTime := newTime - currentTime; currentTime := newTime; accumulator := accumulator + deltaTime; while (accumulator>=dt) do begin (* operations *) inc(t, dt); dec(accumulator, dt); end;

15/06/2007, 11h50
Moumoutte

Je trouve ma methode un peu plus "simple" que la tienne en ce qui concerne la comprehension et meme au niveau du code en lui meme... maintenant ce que vaut la complexite de mon algo par rapport au tiens je ne sais pas