TickToString (rtl)
De Wiki1000
Function TickToMS(t:longint):double;
Cette fonction convertit un nombre représentant un nombre de cycle processeur en une chaine représentant le temps écoulé en milli seconde.
t | Nombre de cycle processeur. |
Result | Une chaine correspondant au temps écoulé. |
Exemple
var t1,t2:longint; begin t1 := GetTickCount; doSomething; t2 := GetTickCount; showMessage(Format('doSomething takes %s ms',[TickToString(t2-t1)])); end;
Voir aussi: