Menghilangkan CaptionBar Delphi

cara menghilangkan caption bar (dengan rumus)
isikan rumus berikut pada formoncreate
(klik form, lihat objecth inspector pada event cari oncreate dan masukkjan rumus dibawah.

SetWindowLong(Handle,gwl_style,GetWindowLong(handle,gwl_style)
and NOT ws_caption); 
ClientHeight:=Height; 
Refresh;



jalankan/run dengan meneken f9

maka hasilnya akan seperti ini (tanpa rumus)

maka hasilnya seperti ini (dengan rumus)