pb:闪动标题栏

闪动标题栏. -------------------------------------------------------------------------------------------------------------------------------------------------------- 关键：FlashWindow 和FindWindowA API函数 -------------------------------------------------------------------------------------------------------------------------------------------------------- 1.创建含有如下控件的窗体：(插入ACTIVEX的ctClock控件.) 控件　控件名　 text ctClock ole_1　　 -------------------------------------------------------------------------------------------------------------------------------------------------------- 2.首先声明如下外部函数： FUNCTION long FlashWindow(ulong hwnd, long bInvert) Library "user32" FUNCTION long FindWindowA( ulong Winhandle, string wintitle ) Library "user32" -------------------------------------------------------------------------------------------------------------------------------------------------------- 3.在ole_1控件的Timechanged事件中输入如下语句： long ll_hwnd ll_hwnd = FindWindowA(0,"闪动的时钟") FlashWindow(ll_hwnd,1)