delphi 移动桌面图标

本文整理自网络，侵删。

 
获取窗口句柄
function TForm1.GetDesktopHand: THandle;
begin
  Result := FindWindow('progman', nil);
  Result := GetWindow(Result, GW_Child);
  Result := GetWindow(Result, GW_Child);
end;
移动第六个图标
Hand := GetDesktopHand;
SendMessage(Hand, LVM_SetItemPosition,5,MakeLparam(100,100));
 

相关阅读 >>

Delphi 系统长文件名与dos形式短文件名的相互转换

Delphi 数据集转换json对象

Delphi datetimepicker 宽度如何与Delphi自带style同步

Delphi 获取当前系统语言环境（en，fr，ja等）

Delphi 时间与相关类型(3): tfiletime、tsystemtime 及 dos 时间

Delphi 阿拉伯数字转中文汉字数字

Delphi写入txt

Delphi 获得idhttp redirect后的url

Delphi xe8 用httpclient下载文件

Delphi_关于null,nil

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

转载请注明出处：木庄网络博客 » delphi 移动桌面图标