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 tdragimage v0.1 Delphi 图片拖拽组件 带有加速度 碰撞效果

Delphi 语言字符集

Delphi 类和对象

winapi 字符及字符串函数(4): charupperbuff - 把缓冲区中指定数目的字符转大写

Delphi access 从数据库里随机选择一行

Delphi执行cmd命令和bat文件

Delphi-改进获取文件md5 hash方法

Delphi xe2 - 实现无敌关机键

setwindowpos改变窗口的位置与状态

Delphi 几个和当前路径相关的新函数

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

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