Description

The following code removes a form�s Maximize button when you click a button.

Code

procedure TForm1.Button1Click(Sender: TObject);
begin
BorderIcons := BorderIcons - [biMaximize];
end;