There is always the free Delphi profiler here:

http://delphitools.info/samplingprofiler/

cheers,
Paul