Hiding caption bars - Delphi

//---------------------------------------------------------------------------
// Author   : Digital Survivor [Esteban Rodríguez Nieto | José Plano]
// Email    : plmad666@gmail.com | jose.plano@gmail.com
// Web site : www.ds-studioscom.ar
//---------------------------------------------------------------------------

We can use this example in the onCreate event:

Procedure TForm1.FormCreate (Sender : TObject);

Begin

     SetWindowLong (Handle, GWL_STYLE, GetWindowLong (Handle, GWL_STYLE) AND NOT WS_CAPTION);
     ClientHeight := Height;

End;

//---------------------------------------------------------------------------