title: How do I set a system-wide API hook in Delphi?
body: <p>Does anyone know about system-wide API hooking with Delphi?</p>
  
  <p>I downloaded madCodeHook, but it doesn't have any source, so I don't want use it; I want to program it myself.</p>
  
  <p>I found <a href="http://www.codeproject.com/KB/system/hooksys.aspx" rel="nofollow noreferrer">an article on Code Project</a>, but it is in C++. Please help me to write it in Delphi 2010.</p>