Bonjour, bonsoir,
je n'ai jamais pris le temps de me pencher sur un problème de ralentissement dans certains programmes jusqu'à aujourd'hui. Je viens de faire un petit test et j'obtiens un ralentissement de la boucle for avec cette configuration:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
 for compt:=1 to (10-Vitesse_du_prog) do
 begin
     if keypressed then
     begin
        .....
     end;
     delay(Tempo_Clavier);
 end;
Je n'ai pas mesuré mais avec un Tempo_Clavier de 20 ms par ex, la boucle se fait mettons 100 fois toutes les 20ms et devient 3 ou 4 fois plus lente ensuite... ... jusqu'à ce qu'une touche soit pressée.

C'est comme si après 100 appels à keypressed sans touche dans le tampon du clavier, keypressed disait "Bon y'en a marre, t'arrête pas de me faire aller voir le tampon alors qu'il est toujours vide, maintenant je vais boire un café à chaque fois avant d'y aller".

Quelqu'un a déjà vu ça ?
Ou a une explication (logique) ?
Ça se guérit ?

Merci d'avance
Gabi