merci pour vos reponses

tu peux demander l'heure systeme au début et à la fin du programme, puis faire une soustraction et afficher le résultat. par contre, je connais pas le nom des fonctions

merci quand meme  

heuuuup

tu le veux en pascal ou en delphi ?
en delphi je peux te donner le calcul pour trouver le temps écoulé.

vivi je ve bien  
p.s. j'avais oublie ce topic =)

tu l'aurais lundi (j'ai utilisé ça au boulot donc j'ai pas le source ici)

tu peux utiliser gettickcount qui te donne le temps écoulé depuis le lancemet de windows en milliseconde.
 
donc tu fais un truc du genre
 
var time_start,duree:longint;
 
time_start := GetTickCount;
 
et en fin de programme  
 
duree := GetTickCount-time_start;  
 
duree contient le temps écoulée en millisecondes...

ouais ca devait etre un truc du genre que j'utilisais.

function temps:real; (*donne l'heure à l'instant t, et converion sous la forme d'un nb réel*)
 var h,mn,sec, sec100 :word;
begin
 gettime(h,mn,sec,sec100)
 temps:=h*3600+me*60+sec+sec*0.01  
end;
 
procedure mon_programme;
 begin
 
 end;
 
begin
 t:=temps;
 mon_programme;
 t:=t-temps; (*durée*)
 (* conversion de la durée en h, mn et sec*)
 q:=int(t/3600);
 write(q);
 t:=t-3600*q;
 q:=int(t/60);
 write(q);
 t:=t-60*q;
 write(t);
end.

Merci pour cette réponse pour le mons exhaustive

[edtdd]--Message édité par saSHOCK--[/edtdd]