delphi 创建大窗口

本文整理自网络，侵删。

 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 内存管理[4]

Delphi system 提供的编译期函数

Delphi 英文单词第一个字母大写

Delphi中format与formatdatetime函数详解

剪贴板单元 clipboards.pas

Delphi tradiogroup 单选分组框组件

Delphi n个字符串替换成1个字符串

Delphi 随机程序名

Delphi版 随机窗口类名

Delphi 判断文件路径，不存在则建立

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

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