RtfLabel, Version 1.3b (alt)

program DrawRtfTextExample;

uses
  Forms,
  drtsamp in 'drtsamp.pas' {FormDrawRtfText};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := 'DrawRtfText Example';
  Application.CreateForm(TFormDrawRtfText, FormDrawRtfText);
  Application.Run;
end.