Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
MOUSE command and Pix2Fox
Message
From
26/01/2009 10:49:03
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
 
 
To
26/01/2009 10:37:03
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01377027
Message ID:
01377043
Views:
19
>I don't have access to the documentation right now, but I seem to recall that some of the sysmetric() values are relevant.

Some of the issue is that it acts differently when running from Dev and running in an EXE. I did need the SysMetric stuff and Sergey was kind enough to have it on his site already canned into procedures. This is what I ended up using:
IF (nKeyCode >= 48 AND nKeyCode <= 57) OR (nKeyCode >= 65 AND nKeyCode <= 90) OR (nKeyCode >= 97 AND nKeyCode <= 122)

	m.lnPosY = _SCREEN.Top + THISFORM.Top + THIS.Top -5 && To get on the arrow
	m.lnPosX = _SCREEN.Left + THISFORM.Left + THIS.Left + THIS.Width -5 && To get on the arrow

	lnRow = pix2fox(lnPosY, .T.,_SCREEN.Fontname ,_SCREEN.FontSize)
	lnCol = pix2fox(lnPosX, .F.,_SCREEN.Fontname ,_SCREEN.FontSize)

	MOUSE AT lnRow,lnCol

ENDIF

DODEFAULT(nKeyCode, nShiftAltCtrl)
Previous
Reply
Map
View

Click here to load this message in the networking platform