Delphi 创建大窗口


本文整理自网络,侵删。

 创建大窗口


procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowLong(
Handle,
GWL_STYLE,
not (WS_THICKFRAME) and GetWindowLong(Handle, GWL_STYLE) or Integer(WS_POPUP)
);
SetWindowPos(Handle, 0, 0, 0, 1920, 1080, SWP_NOZORDER or SWP_NOMOVE);
end;

相关阅读 >>

Delphi 通过api 隐藏任务栏所有托盘图标

Delphi md5加密算法

Delphi 时间与相关类型(3): tfiletime、tsystemtime 及 dos 时间

Delphi tcolortohex 与 hextotcolor

Delphi 根据窗口类判断程序是否运行

Delphi firedac操作sqlite内存数据库

devexpress vcl 动态调用皮肤

Delphi静态和动态调用dll的实例

Delphi 加密解密字符串函数

Delphi xe7开发的获取网页中字符串的编码是否是utf8

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...