Рефакторинг с использованием шаблонов

Примеры в статье на языке Delphi, но статья по объёму небольшая и толково иллюстрирована: http://www.rsdn.ru/article/patterns/patterns.xml