知识大全 PowerBuilder制作IE风格的图标按钮[4]

Posted 2022-07-22 事件

篇首语：眼前多少难甘事，自古男儿当自强。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全 PowerBuilder制作IE风格的图标按钮[4]相关的知识，希望对你有一定的参考价值。

PowerBuilder制作IE风格的图标按钮[4] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

　　 DrawEdge(GetDC(handle(this)) 　　 lr_Border + + + ) end if

return // // *** end lbuttondown event ***

// LButtonUp 事件代码 // *** begin lbuttonup event *** // rect lr_Border

if ib_MouseCaptured then 　　 ib_MouseCaptured = FALSE 　　 ReleaseCapture() end if

if (XPos < or YPos < ) or (XPos > 　　 this Width or YPos > this Height) then 　　 in_State = 　　 this PictureName = is_PicNormal

else 　　 in_State = 　　 this PictureName = is_PicHover

　　 SetCapture(handle(this)) 　　 ib_MouseCaptured = TRUE

　　 if not sb_SuppressHoverBorder then 　　　　 lr_Border left = 　　　　 lr_Border top = 　　　　 lr_Border right = UnitsToPixels 　　　　 (this Width XUnitsToPixels!) 　　　　 lr_Border bottom = UnitsToPixels 　　　　 (this Height YUnitsToPixels!) 　　　　 DrawEdge(GetDC(handle(this)) 　　　　 lr_Border + + + ) 　　 end if end if // 产生Clicked事件 this event post clicked() return // // *** end lbuttonup event *** // Other 事件代码 // *** begin other event *** // if message number = and ib_MouseCaptured then 　　 // wm_CaptureChanged 　　 ib_MouseCaptured = FALSE 　　 in_State = 　　 this PictureName = is_PicNormal 　　 return end if 　　return 　　// 　　// *** end other event *** 　　四简要说明

　　 ib_MouseCaptured变量是作为MouseMove事件的刷新控件图片的信号灯及判断是否已安装了鼠标捕捉器

　　 sb_SuppressHoverBorder变量默认值为FALSE 当值为TRUE时控件不绘制凸或凹边框

　　 Other 事件当鼠标捕捉器被释放或被替换时会触发WM_CAPTURECHANGED事件例如您在Clicked事件中调用MessageBox函数时将触发WM_CAPTURECHANGED事件在此事件代码中恢复按钮到Normal状态

cha138/Article/program/PB/201311/24554