右下角小窗口透明消失特效，鼠标进入保持显示，离开渐渐消失

右下角小窗口透明消失特效，鼠标进入保持显示，离开渐渐消失例子。
.子程序 任务栏高度, 整数型, 公开, 成功则返回任务栏高度，失败返回0
.局部变量 矩形, RECT
.局部变量 任务栏高度, 整数型

SystemParametersinfo (#SPI_GETWORKAREA, 0, 矩形, 0)
任务栏高度 ＝ 取屏幕高度 () － 矩形.D ' D是矩形区域高度不包括任务栏
返回 (任务栏高度)