Hi,
Is problem with Harbour or with my OS or mouse driver?
Harbour 2.0.0
Windows XP SP3
Compile & link: hbmk2 TestMouse.prg
Sample code:
-----------------
TestMouse.prg
-----------------<Bof>-----
#include "inkey.ch"
procedure TestMouse()
local nKey:=0
clear screen
@ 10, 0 SAY "Go to any row & col:"
@ 11, 0 SAY "Whell button and other buttons return different MRow & MCol
position"
while InKey(0, INKEY_ALL) <> K_ESC
@ 0, 0 SAY "MRow=" +Str(MRow(),4) +", MCol=" +Str(MCol(),4)
enddo
return
------------------<Eof>------
Thanks to all
Stupar
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
