淡入淡出按钮特效

易语言 2020-09-01 17:26:22

淡入淡出按钮特效

易语言淡入淡出按钮源码是易语言模块GDIPlus类2.1.ec的应用例程。

dstGraphics.画图像缩放部分I (局部_GP图像, 局部_目标左边, 局部_目标顶边, nineWid, nineHei, 0, 0, nineWid, nineHei, #单位_像素) ' 左上角部分
dstGraphics.画图像缩放部分I (局部_GP图像, 局部_目标左边 + nineWid, 局部_目标顶边, 局部_目标宽度 - nineWid × 2, nineHei, nineWid, 0, 局部_GP图像宽度 - nineWid × 2, nineHei, #单位_像素) ' 中上部分

.如果 (m_bMax = 假)
m_bMax = 真
GetClientRect (FindWindow (“Shell_TrayWnd”, 字符 (0)), rc)
ShowWindow (取窗口句柄 (), #SW_SHOWMAXIMIZED)
SetWindowPos (取窗口句柄 (), #HWND_NOTOPMOST, 0, 0, GetClientWidth (取窗口句柄 ()) + 2, GetClientHeight (取窗口句柄 ()) - (rc.Bottom - rc.Top) + 2, #SWP_SHOWWINDOW)
ForceRedraw ()
.否则
m_bMax = 假
ShowWindow (取窗口句柄 (), #SW_RESTORE)
ForceRedraw ()