DelphiX alle 1/30 Sek was tun im timer mit anderem Intervall

[sniper_w]

Delphi-Quellcode:

      QueryPerformanceCounter( currentTime );
      // currentFrame - frameTime >>> g_FrameInterval !!!!!!!!!!!
      speed := (currentTime - frameTime) / Freq;
      frameTime := currentTime;

         // now we have a TIME BASED rotation
         angx := angx + (170 + rot_speed )* speed;
         if angx>359 then angx := 0;

         angy := angy + (160 + rot_speed ) * speed;
         if angy>359 then angy := 0;

         angz := angz + (150 + rot_speed )  * speed;
         if angz>359 then angz := 0;

So werden die 3 Variablen angx, angy und angz ABHÄNGIG von der ZEIT addiert.

rot_speed ist eine beliebige Zahl / Konstante...

So "schnell" muss du dich bewegen, rotieren, etc.. pro Prozedur Afuruf.
var speed : double;