Andere Komponenten "einsperren"

[SirThornberry]

genau so gehts

Delphi-Quellcode:

  protected
    procedure CreateParams(var Params: TCreateParams); override;
[...]

procedure TYourComponent.CreateParams(var Params: TCreateParams);
begin
  inherited CreateParams(Params);
  ControlStyle := ControlStyle + [csAcceptsControls];
end;