如何用鼠标左右键实现打印预览时的放大缩小?

denxiaom 2004-11-22 12:21:02
代码如下:
setpointer(Cross!)
integer i
i=integer(em_1.text)
if flags= 2 then
i=i - 1
elseif flags=1 then
i++
end if
//messagebox("",string(i))
IF i>=1 And i<=200 then
em_1.text=string(i)
Dw_1.Object.Datawindow.Print.Preview.Zoom=i
END IF
右键可以触发,左键就触发不了,为什么?
...全文
131 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
WorldMobile 2004-11-22
  • 打赏
  • 举报
回复
你单步执行一下看看不就行了

放到clicked事件里,在开头写个messagebox,如果不弹出来

说明和你的clicked事件的祖先代码有什么冲突
denxiaom 2004-11-22
  • 打赏
  • 举报
回复
多谢
wspeed 2004-11-22
  • 打赏
  • 举报
回复
你应该创建事件ID是PBM_LBUTTONDOWN,在里面写上上面那段代码就可以实现
denxiaom 2004-11-22
  • 打赏
  • 举报
回复
在CLICKED事件中怎么判断左右键?
忘记说我的代码在自定义事件中,事件ID是PBM_RBUTTONDOWN.

1,076

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧