Если где неправ - пусть меня зубры поправят :О)
Главная форма походу пересылает компоненте все сообщения из очереди для которых у этой компоненты написан обработчик. Т.е. чтобы TTitler обрабатывала WM_NCPAINT надо так:

TTitler = class(TComponent)
private
FParentForm: TForm;
procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
public
constructor Create(AOwner: TComponent); override;
end;

implementation

constructor TTitler.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
ParentForm:=TForm(AOwner);
end;

procedure TTitler.WMPaint(var Message: TWMPaint);
begin
//Your code here
end;


Коментарии:
наверное можно не заводить указатель на форму FParentForm и ссылаться на неё в обработчике, пользуясь TForm(SOwner)
но почему-то у меня это в аналогичной ситуации не работало, и в результате - такой код.

Если где неправ - пусть меня зубры поправят :О)
Главная форма походу пересылает компоненте все сообщения из очереди для которых у этой компоненты написан обработчик. Т.е. чтобы TTitler обрабатывала WM_NCPAINT надо так:

TTitler = class(TComponent)
private
FParentForm: TForm;
procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
public
constructor Create(AOwner: TComponent); override;
end;

implementation

constructor TTitler.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
ParentForm:=TForm(AOwner);
end;

procedure TTitler.WMPaint(var Message: TWMPaint);
begin
//Your code here
end;


Коментарии:
наверное можно не заводить указатель на форму FParentForm и ссылаться на неё в обработчике, пользуясь TForm(SOwner)
но почему-то у меня это в аналогичной ситуации не работало, и в результате - такой код.