No dices qué base de datos estás usando, pero algunas ya traen incorporadas esas características que necesitas.
Si no lo tiene entonces puedes hacer algo así como esto:
Código Delphi
[-]
timeinicio := now;
sql.open;
timefinal := now;
sql.last;
showmessage(sql.recordcount);
showmessage('tiempo empleado:'+timefinal-timeinicio);