Hide The Form’s Caption Bar

Author: admin | Category: Form, Tips and Tricks

//This is how we can hide the Form Caption Bar
//Add this code to the OnCreate event of your form1
     SetWindowLong(Handle,gwl_style,GetWindowLong(handle,gwl_style) and NOT ws_caption);
     ClientHeight:=Height;
     Refresh;
 
//below is the simple example
 
unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;
 
type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.FormCreate(Sender: TObject);
begin
  SetWindowLong(Handle,gwl_style,GetWindowLong(handle,gwl_style) and NOT ws_caption);
  ClientHeight:=Height;
  Refresh;
end;
 
end.

Tags: Application, Application Title, Form