Comment mettre le titre invisible d'une fenêtre?

Comment mettre le titre invisible d'une fenêtre?

procedure TForm1.FormCreate(Sender: TObject);
begin
  SetWindowLong( Handle,
    GWL_STYLE,
    GetWindowLong( Handle, GWL_STYLE )
    and not WS_CAPTION );
  ClientHeight := Height;
end;