Le Timer de Delphi n'est pas fait pour ça. Il permet d'effectuer des tâche avec une période régulière.
Le plus simple pour mesurer un temps de clacul, est de faire la différence entre l'heure de début et de fin. Il faut penser que le format TDateTime de Delphi supporte très bien les additions et soutractions. D'ou :
Var Debut,Fin:TDateTime
Begin
// On garde l'heure de début
Debut:=Now;
// Gros calcul
....
// On prend l'heure de fin
Fin:=Now;
// On afffiche la différence
ShowMessage('Calcul en '+TimeToStr(Fin-Debut));
End;
Tu peux remplacer TimeToStr par une autre fonction, surtout si tu veux afficher aussi les millisecondes. Par exemple
FormatDateTime('HH:NN:SS:ZZZ',Fin-Debut);
---
Nono du Moulin
---
-------------------------------
Réponse au message :
-------------------------------
Je cherche un moyen de calculer le temps d'exécution d'une procedure en delphi, existe-t-il une fonction permettant de le faire ?
(Un Timer est dispo dans la Personnal Edition, comment fonctionne-t-il ?)
Greg.