動態隱藏/顯示窗口的標題欄（同時保持窗口的Sizeable性能）

今天考慮作界面的時候，想去掉窗體的標題欄，但設置 Form.BorderStyle := bsNone; 會導致窗體不可再 Sizeable （通過鼠標操作改變窗體大小），仔細翻看了相關Help也沒找到解決辦法。
　　在DFW裡終於搜索到答案：
　　
　　  // 對指定窗體設置屬性
　　  SetWindowLong(Handle,                   // 當前窗體句柄
　　                GWL_STYLE,                // 表示當前是要設置新的窗體（普通）樣式
　　                // 得到指定窗體信息
　　                GetWindowLong(Handle, GWL_STYLE)
　　                  and (not WS_CAPTION));  // 去掉樣式(s)中的“標題”樣式
　　  Height := ClIEntHeight;
　　  Width := ClIEntWidth;