delphi 让程序主窗口不响应“显示桌面”

本文整理自网络，侵删。

  让程序主窗口不响应“显示桌面”

procedure TForm1.FormCreate(Sender: TObject); 
begin 
with Application do 
SetWindowLong(Handle, GWL_EXSTYLE, GetWindowLong(Handle, GWL_EXSTYLE) and 
not WS_EX_APPWINDOW or WS_EX_TOOLWINDOW); 
SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE); 
end; 
 

相关阅读 >>

Delphi winexec 执行cmd

Delphi写一个简单的多线程的程序

idmessage读取eml内容报

Delphi 非主窗体(即子窗体)在任务栏显示按钮

Delphi中使用tpathanimation

Delphi 大小排序算法代码

Delphi制作手机签名app（windows同样适用）

Delphi 获取临时文件夹路径

Delphi tfilestream 逐行读取文本

Delphi删除cookie和ie缓存

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

转载请注明出处：木庄网络博客 » delphi 让程序主窗口不响应“显示桌面”