Hide Caption Bar with delphi

To hide the caption bar, add the code in the event onCreate.

procedure TForm1.FormCreate(Sender:TObject);

1.      begin

2.      SetWindowLong(Handle,gwl_style,GetWindowLong(handle,gwl_style) and NOT ws_caption);

3.      ClientHeight:=Height;

4.      Refresh;

5.      end;