Neue TPanel-Klasse

[SirThornberry]

das einfachste ist "SetBounds" zu überschreiben und wenn sich "width" oder "height" ändert dann kannst du ja reagieren...

Delphi-Quellcode:

  TYourpanel = class(TPanel)
  protected
    procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer); override;
[...]

procedure TYourpanel.SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
var Sizechanged: Boolean;
begin
  sizechanged := (AWidht <> Width) or (AHeight <> AHeight);
  inherited SetBounds(ALeft, ATop, AWidth, AHeight);
  if sizechanged then
  begin
    //do something you want todo onResize
  end;
end;