如何用鼠标左右键实现打印预览时的放大缩小?
代码如下:
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
右键可以触发,左键就触发不了,为什么?