Neue Komponente (TPanel). OnResize-Event überschreiben?

[Nalincah]

Ich will ne neue Komponente schreiben. Ein TPanel, in dem eine TListBox liegt. Wenn die Größe des Panels verändert wird, soll automatisch auch die größe der ListBox geändert werden. Wie kann ich das machen?

[Stevie]

Ganz einfach:

Delphi-Quellcode:

TPanelEx = class(TPanel)
  procedure WMSize(var Msg: TWMSize); message WM_SIZE;
end;