A Open Source Mocking framework for Delphi XE2 or later - View it on GitHub