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 禁用本地网络连接/启用本地网络连接

学习使用Delphi for android 调用java类库

firemonkey使用android的路径信息

Delphi 程序员的反攻－－－－打击p2p

Delphi 超精简无卡顿调用dos命令输出结果

Delphi的tfilestream

Delphi 批量删除同类文件的函数

Delphi int64：是Delphi中最大的整数，64位有符号整数

实现拖动无标题窗口的5种方法

Delphi tmemo控件滚动条scrollbar末尾插入字符串一点都会闪烁的轻松实现

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

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