delphi 隐藏任务栏程序，取消自动对齐和网格对齐

本文整理自网络，侵删。

 
 隐藏任务栏中的程序
showwindow(application.handle,sw_hide); //隐藏图标
 setwindowlong(application.Handle, gwl_exstyle,
  getwindowlong(application.Handle,gwl_exstyle) or 
ws_ex_toolwindow and not ws_ex_appwindow);  


获取桌面句柄后
取消自动对齐和网格对齐
  nStyle := GetWindowLong(hand, GWL_STYLE);
  nStyle := nStyle and (not LVS_AUTOARRANGE);
  SetWindowLong(hand, GWL_STYLE, nStyle);    //取消自动对齐
  nStyle := ListView_GetExtendedListViewStyle(hand);
  nStyle := nStyle and (not $80000);
  ListView_SetExtendedListViewStyle(hand, nStyle);   //取消对齐到网格

设置为自动对齐和网格对齐
  nStyle := GetWindowLong(hand, GWL_STYLE);
  nStyle := nStyle or LVS_AUTOARRANGE;
  SetWindowLong(hand, GWL_STYLE, nStyle); //自动对齐

  nStyle := ListView_GetExtendedListViewStyle(hand);
  nStyle := nStyle and (not $80000);
  ListView_SetExtendedListViewStyle(hand, nStyle);//对齐到网格

 

相关阅读 >>

Delphi unigui获取连接的客户端列表

在rad studio Delphi或c++安卓应用中使用自定义java库

Delphi 保证当前程序显示在最前

Delphi中write,read,writeln和readln的用法

Delphi锁定鼠标 模拟左右键 静止一会自动隐藏鼠标

Delphi 对gzip解压

Delphi提取二值图像轮廓

Delphi 递归实现从m 个集合中 任取一个元素 生成组合

Delphi 判断网站文件是否存在

Delphi版pspterminateprocess驱动源码

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

转载请注明出处：木庄网络博客 » delphi 隐藏任务栏程序，取消自动对齐和网格对齐