#include "Fivewin.ch"
#define WM_SYSKEYDOWN 0x0104
Function TestCheck
LOCAL oDlg
LOCAL oChk, lChk, nChk := 0
LOCAL oChk2, lChk2, nChk2 := 0
DEFINE DIALOG oDlg
@ 0, 1 CHECKBOX oChk VAR lChk OF oDlg
@ 1.2, 1 CHECKBOX oChk2 VAR lChk2 OF oDlg
@ 2, 1 BUTTON "&Close" ACTION oDlg:End()
ACTIVATE DIALOG oDlg CENTER ;
ON INIT oChk:PostMsg( WM_SYSKEYDOWN, 0, 2 ** 29 )
return nilBoard index FiveWin for Harbour/xHarbour Auto focus a checkbox from a dialog ON INIT
http://msdn.microsoft.com/en-us/library/ms646286(v=vs.85).aspx
lParam
The repeat count, scan code, extended-key flag, context code, previous key-state flag, and transition-state flag, as shown in the following table.
...
29 The context code. The value is 1 if the ALT key is down while the key is pressed; it is 0 if the WM_SYSKEYDOWN message is posted to the active window because no window has the keyboard focus.
This way we simulate a pressed ALT
lParam
The repeat count, scan code, extended-key flag, context code, previous key-state flag, and transition-state flag, as shown in the following table.
...
29 The context code. The value is 1 if the ALT key is down while the key is pressed; it is 0 if the WM_SYSKEYDOWN message is posted to the active window because no window has the keyboard focus.
This way we simulate a pressed ALT
It doesn't work here. I always used
It works fine.
EMG
oDlg:bStart = { || oChk2:SetFocus() }It works fine.
EMG
XP and Win7 differences again ? 