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 edit控制字居中，居左，居右

Delphi memo 字符串换行

Delphi复制整个文件夹(当然包括嵌套文件夹)

Delphi 10.3 调试程序时出错：unable to create process:请求的操作需要提升

Delphi xe5、6、7在android或者ios上使用ansistring和ansichar

Delphi根据进程名强制关闭进程

Delphi注入下载者源代码

Delphi 一组数据，按由大到小进行排序，并输出最大值与最小值

Delphi 创建多级目录

Delphi 禁止窗口移动

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

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