>Hello,
>
>I tried to write a code in the Keypress event of the form which would track when the user presses a number with the CTRL button pressed. I was very surprised that the keypress event does not get triggered when pressing the CTRL and 1 key, up to Ctrl + 9. Only Ctrl+0 does raise the keypress event.
>
>Is there a workaround, or something that I overlook?


Ctrl+1 through ctrl+9 are not sent to the window


Alternatively, using bindevent


In the load()

if( !DoDefault() )
	return .f.
endif
#define WM_KEYUP                        0x0101


=bindevent(m.this.hwnd, WM_KEYUP, m.this, 'KeyUp', 0)
declare long GetAsyncKeyState in user32.dll long nkey

In the Unload()

=unbindevents(m.this.hwnd)


return dodefault()

Add a method KeyUp

lparameters hwnd, msg, wparam, lparam


#define ASCII_0			0x30
#define ASCII_1			0x31
#define ASCII_9			0x39

#define VK_CONTROL		0x11

do case
case !m.this.KeyPreview

case !between(m.wparam, ASCII_1, ASCII_9)

case !bittest(GetAsyncKeyState(VK_CONTROL), 15)

case !RaiseEvent(m.this, 'KeyPress', m.wparam, 2)

endcase