|
Menyembunyikan
caption bar
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;
|