Chaine TTime en seconde

Résolu
azertyloris Messages postés 19 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 31 décembre 2005 - 28 mars 2005 à 15:10
azertyloris Messages postés 19 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 31 décembre 2005 - 28 mars 2005 à 19:29
Bonjour,

J'aimerai savoir si il est possible de transformer une chaine TTime en seconde ?

Ce serai pour calculer combien de temps met un processus a se realiser.

J'ai penser a

strtoint(timetostr(stop-start)[5]+timetostr(stop-start)[6])*60+strtoint(timetostr(stop-start)[7]+timetostr(stop-start)[8])

mais c'est long ... y a '-il plus simple svp

Merci d'avance

2 réponses

japee Messages postés 1727 Date d'inscription vendredi 27 décembre 2002 Statut Modérateur Dernière intervention 6 novembre 2021 8
28 mars 2005 à 17:48
Il serait à mon avis plus simple et plus efficace d'utiliser GetTickCount :



var tc: Word;



Juste avant le processus :



tc := GetTickCount;



Juste après :



tc := GetTickCount - tc;



Tu obtiens ainsi la durée du processus en millisecondes, à toi de
convertir en secondes si ça te convient mieux, mais c'est moins précis,
forcément...



Bonne prog'



japee
3
azertyloris Messages postés 19 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 31 décembre 2005
28 mars 2005 à 19:29
merci c'est pile poil ce qu'il me fallait :)
0
Rejoignez-nous