Categories
Downloads
Invisible titles
procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong( Handle,
GWL_STYLE,
GetWindowLong( Handle, GWL_STYLE )
and not WS_CAPTION );
ClientHeight := Height;
end;
begin
SetWindowLong( Handle,
GWL_STYLE,
GetWindowLong( Handle, GWL_STYLE )
and not WS_CAPTION );
ClientHeight := Height;
end;
Listing #1 : Delphi code. Download hidetitl (0.28 KB).
To share this: BlinkBits | BlinkList | Blogmarks | Co.mments | Connotea | Del.icio.us | Digg | Facebook | FrankIt | Furl | Ma.gnolia | Newsvine | Reddit | Yahoo
Applicable Keywords : Delphi, Delphi 2.x, Delphi 3.x, Functions, User Interface, Win32
Previous Tip : Log off, shut down, restart, or reboot
Random Tip : Copying more than one file to a single destination (or merging)
Next Tip : No screen savers for me please
Random Tip : Copying more than one file to a single destination (or merging)
Next Tip : No screen savers for me please