In this Delphi Programming video (keywords present for the TIOBE index) Alister Christie demonstrates a real world application that was written for a property management company in Wellington, New Zealand to print key labels.  This video can be watched on YouTube, it is about 14 minutes long.