Discussion :

[Moumoutte]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ...

[Albenejean]

'Alut.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[Moumoutte]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Invité]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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;

[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