VC雕虫小技:模拟MSN闪屏效果
205 views 七月 17, 06 by TimothyMSN的闪屏效果,大家一定见过了吧。如何在其他程序中实现这样的效果呢?偶突然心血来潮,模拟了一下MSN闪屏效果的实现。其实原理很简单,就是播放一段声音,然后开个线程来MoveWindow,只不过MoveWindow要设定好坐标,这样窗口不断移动,看起来像是在振动的效果一样。呵呵。没什么技术含量。我把这个功能封装成了一个DLL,大家直接调用这个DLL,传入目标窗口的Handle,然后调用DLL的函数就可以了。
代码中包含调用的示例代码和闪屏模拟的DLL。
下载下来看看就知道了。 [cool]
声明: 此Blog中的文章和随笔仅代表作者在某一特定时间内的观点和结论,对其完全的正确不做任何担保或假设
本站文章均采用 知识共享署名-相同方式共享3.0 协议进行授权,除非注明,本站文章均为原创,转载请注明转自 Timothy's Space 并应以链接形式标明本文地址!
你可能也对下列文章感兴趣
- 没有相关文章!
procedure FlashWind(const aHandle : THandle;const aX,ay,aW,aH : Integer;
const aFlashTime : Integer);
var
t : Integer;
x,y,l : integer;
begin
t := aFlashTime;
while t >= 0 do
begin
Randomize;
if t Mod 2 = 0 then
l := 1
else
l := -1;
x := aX + Random(8) * l;
y := aY + Random(6) * l;
MoveWindow(aHandle,x,y,aw,ah,true);
Application.ProcessMessages;
sleep(30);
Dec(t,30);
end;//for I
end;