Mega Code Archive

 

Categories / Delphi / Forms

 

How to hide the MinimizeMaximize buttons of a form

Title: How to hide the Minimize/Maximize buttons of a form procedure TForm1.FormCreate(Sender: TObject); var l: DWORD; begin l := GetWindowLong(Self.Handle, GWL_STYLE); l := l and not (WS_MINIMIZEBOX); l := l and not (WS_MAXIMIZEBOX); l := SetWindowLong(Self.Handle, GWL_STYLE, l); end;