本文整理自网络，侵删。
隐藏任务栏中的程序
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 打造mygetprocaddress函数(Delphi源码)
更多相关阅读请进入《Delphi》频道 >>
