HotLog is a project mainly written in Pascal, it's free.

Unit utilitária para logs de aplicações em Delphi