Senin, 03 Maret 2008

Menyembunyikan caption bar pada delphi

Pada bahasan kali ini saya mencoba membuat postingan tentang bagaimana menyembunyikan caption bar pada delphi, cara nya sangat mudah. Anda bisa mengikuti langkah nya sebagai berikut...


Untuk menyembunyikan caption bar, tambahkan kode pada event onCreate.

procedure TForm1.FormCreate(Sender:TObject);
begin

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

end;

sumber : www.klik-kanan.com

Tidak ada komentar: