The DMoq project is a mocking framework for Delphi (XE2+), loosely based on the Moq project.