Delphi. Simple helper

Что такое хэлпер, можно прочитать здесь. Если кратко, то это класс расширяющий функциональность другого класса. Это немного похоже на наследование, но синтаксически выглядит по-другому, а именно:

type
  THelperForTObject = class helper for TObject
  public
    procedure Log(aMsg: string);
  end;

implementation

{ THelperForTObject }

procedure THelperForTObject.Log(aMsg: string);
begin
  Write(aMsg);
end;

Теперь мы можем в любом классе вызывать логгер, не правда ли удобно?

  o := TObject.Create();
  try
    o.Log('test logging');
    ReadLn;
  finally
    o.Free();
  end;

Области применения хэлперов.