S'il vous plaît, je dois mesurer le temps de recherche dans mon programme pascal afin de mesurer la performance efficace .. s'il y a une fonction ou un code pour mesurer le temps de recherche?Mesurer le temps d'exécution dans le programme pascal
grâce
Essayez cette
uses DateUtils;
var
FromTime, ToTime: TDateTime;
DiffMinutes: Integer;
begin
FromTime := Now;
// do your process
ToTime := Now;
DiffMinutes := MinutesBetween(ToTime,FromTime);
end;
Merci d'avoir répondu, je l'applique mais ça ne marche pas parce que j'ai utilisé Trubo pascal 1.5 ... Je pense qu'il y a une autre fonction comme TimerCount, GetTickCount, etc. moi si vous avez un codage pour cette fonction ?? merci – zenab
Je suis surpris que Turbo Pascal 1.5 fonctionne même sur Windows 7. –
Il ne fonctionnait pas pour moi non plus, parce que Free Pascal ne trouvent pas le "maintenant" -Function ..
-je ajouter "utilise sysutils" dans Bharats Réponse et ça marche bien pour moi!
comme:
uses DateUtils, sysutils;
var
FromTime, ToTime: TDateTime;
DiffMinutes: Integer;
begin
FromTime := Now;
// do your process
ToTime := Now;
DiffMinutes := MinutesBetween(ToTime,FromTime);
end;
Mon système d'exploitation dispose d'une commande 'time'. Quel système d'exploitation utilisez-vous? –
Merci J'ai utilisé Windows 7 Ultimate – zenab