Без окон и дверей... Компонент для сообщений., Property Handle. Опции

[#$# PaVeL #$#]

Привет всем, всем, всем!
А теперь по делу...
Прошу подсказать как создать компонент являющимся прямым потомком

Class (TComponent)

и имеющий одно свойство

Property Handle : HWND

При этом свойство должно автоматически создаваться и удаляться.
Цель: Сделать объект который может принимать и отправлять сообщения в программе не имеющей ни формы, ни даже консольного окна. (Без окон и дверей полна горница людей ). Заранее большое спасибо!

[#$# PaVeL #$#]

Type
  TMyComponent = class(TComponent)
    PHandle : HWND;
  private
  public
    procedure OpenFile(var msg: TMessage); message WM_OPENFILE;
    procedure Restore(var msg: TMessage); message WM_RESTORE;
  published
    Property Handle : HWND read PHandle;
  end;

При этом

и имеющий одно свойство

Property Handle : HWND

При этом свойство должно автоматически создаваться и удаляться.

при этом конструктор и деструкторы всё должно быть.
Подскажите реализацию.
А насчёт компонента, Hardcase, хотелось бы взглянуть на него.