乍么让DW的image具有按下和弹起的效果?
乍么让DW的image可以像button一样具有按下弹起的效果????(我没有找到 pbm_dwnlbuttondown ....)
[解决办法]
在数据窗口里自定义一个消息为pbm_lbuttondown, pbm_lbuttonup事件
即可实现
[解决办法]
把图片放到图形按钮里不就完了
[解决办法]
帮顶
[解决办法]
数据窗口 自定义事件 名u_down
event id pbm_lbuttondown
Integerli_picture_sum, i, li_pos
Stringls_object
ls_object = Lower(dw_main.GetObjectAtPointer())
li_pos = Pos(ls_object, "~t")
If li_pos > 0 Then ls_object = Left(ls_object, li_pos - 1)
If Describe(ls_object + ".type") <> "bitmap" Then Return
If dw_main.Modify(ls_object + ".Border='5'") = "" Then //按下效果
End If
建立自定义事件 u_up
event id:pbm_dwnlbuttonup
Integerli_picture_sum, i, li_pos
Stringls_object
ls_object = Lower(dw_main.GetObjectAtPointer())
li_pos = Pos(ls_object, "~t")
If li_pos > 0 Then ls_object = Left(ls_object, li_pos - 1)
If Describe(ls_object + ".type") <> "bitmap" Then Return
If dw_main.Modify(ls_object + ".Border='6'") = "" Then
End If
以上代码基本可以实现按下弹起效果，请楼主自行完善
