Mega Code Archive

 

Categories / Delphi / API

 

Removing a forms caption bar

Question: How can I get rid of a forms caption bar? Answer: Reset the form style, then reset the height of the form. Note: You will need to add a method to terminate the application, as there will no longer be title bar buttons or a system menu. Example: procedure TForm1.FormCreate(Sender: TObject); begin SetWindowLong(Form1.Handle, GWL_STYLE, GetWindowLong(Handle,GWL_STYLE) and not WS_CAPTION); Height := ClientHeight; end;