Maximieren-Button in Form entfernen

[AlexII]

Also ich hab das so gemacht:

Delphi-Quellcode:

type
  TForm1 = class(TForm)
  protected
    procedure CreateParams(var Params: TCreateParams); override;
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.Style := Params.Style and (not WS_MAXIMIZEBOX); 
end;

Und der Maximieren Button verschwindet trotzdem nicht