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多线程学习：多线程数据库查询（ado）

Delphi中获取光标句柄代码（包含获取当前线程id）

Delphi 生成可以控制最大32位随机英文数字字符串

Delphi xe 使用savestate保存firemonkey状态的示例

Delphi中调用api函数exitwindowsex可以实现系统的关机，注销，和重启

Delphi ios 保持设备开机状态

Delphi编程防止界面卡死的方法

Delphi中实现调整图像的色阶的算法

Delphi向当前窗口模拟键盘ctrl+v发送"粘贴"

Delphi 从资源文件中加载字符

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

转载请注明出处：木庄网络博客 » Delphi 创建大窗口