只需要在窗体的创建时,添加如下代码
procedure TMainForm.FormCreate(Sender: TObject);begin SetWindowLong(handle, gwl_style, getwindowlong(handle, gwl_style) xor ws_caption); hide; show;end;
本文共 252 字,大约阅读时间需要 1 分钟。
只需要在窗体的创建时,添加如下代码
procedure TMainForm.FormCreate(Sender: TObject);begin SetWindowLong(handle, gwl_style, getwindowlong(handle, gwl_style) xor ws_caption); hide; show;end;
转载于:https://www.cnblogs.com/wangmingshuo/archive/2013/05/16/3323396.html