[转]设置桌面图标文字透明

原创于 2005-07-10 02:27:00 发布 · 1.9k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#windows #优化 #xp

软件技术专栏收录该内容

40 篇文章

订阅专栏

博客展示了一段实现桌面图标文字透明的代码，但刷新桌面会恢复。作者猜测是捕获桌面刷新消息后重新设置，经验证假设正确，如“Windows优化大师”通过在注册表启动项新建键值，运行外部程序实现桌面文字透明。

一段代码，只实简单地现了透明，但只要桌面一刷就会恢复，其它软件不知是怎么实现的，个人猜测，可能是捕获到桌面刷新的消息后就再重新设置（未经考证之想法）

var wnd:HWND;
begin
   Wnd := GetDesktopWindow;
   Wnd := FindWindowEx(Wnd, 0, 'Progman', nil);
   Wnd := FindWindowEx(Wnd, 0, 'SHELLDLL_DefView', nil);
   Wnd := FindWindowEx(Wnd, 0, 'SysListView32', nil);
   SendMessage(Wnd, $1026, 0, $ffffffff);
   SendMessage(Wnd, $1024, 0, $00ffffff);
   InvalidateRect(Wnd, nil, TRUE);
end;

///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

经过验证，原来的假设是正确的。“Windows优化大师”就是在注册表的启动项新建了一个名为“桌面图标文字自动透明”键值为“X:/Program Files/Wom/WinMem.exe XP”的项，在启动时运行了一个外部程序来实现桌面文字的透明的。