search - Measure the run time in pascal program -

Please, to measure the efficiency of the display, I need to measure search time in my Pascal program. Is the function or code to measure search time?

thanks

try it

  usage Does dateUtils; Var from Time, Totaim: TDTtime; Diff min: integer; Start with: = now; // ToTime your process: = now; Dispute: = minutes (from time to time, from time to time); End;