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 获得每个进程的cpu使用率

Delphi tms web core直接从html&css设计的页面布局

Delphi zlib 流压缩解压

Delphi firedac连接oracle

Delphi 读url下txt中的下载地址的简单下载者代码

Delphi xe5 json

Delphi setpriorityclass 设置当前程序的优先级

Delphi 删除字符串中指定字符

Delphi opendialog设置默认打开路径

Delphi中的split函数

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

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