动态隐藏/显示窗口的标题栏（同时保持窗口的Sizeable性能）

今天考虑作界面的时候，想去掉窗体的标题栏，但设置 Form.BorderStyle := bsNone; 会导致窗体不可再 Sizeable （通过鼠标操作改变窗体大小），仔细翻看了相关Help也没找到解决办法。

在DFW里终于搜索到答案：

// 对指定窗体设置属性

SetWindowLong(Handle, // 当前窗体句柄

GWL_STYLE, // 表示当前是要设置新的窗体（普通）样式

// 得到指定窗体信息

GetWindowLong(Handle, GWL_STYLE)

and (not WS_CAPTION)); // 去掉样式(s)中的“标题”样式

Height := ClientHeight;

Width := ClientWidth;