Ctrl + T and bKeyDown
Posted: Mon Dec 26, 2022 7:00 am
hi.
i do have in Main
how can i get Ctrl + T 
i do have in Main
Code: Select all | Expand
oMain:bKeyDown := { | nKey, nFlag | DoMyKey( nKey, nFlag) }
Code: Select all | Expand
STATIC PROCEDURE DoMyKey( nKey, nFlag )
DO CASE
CASE GetKeyState( VK_SHIFT )
CASE GetKeyState( VK_CONTROL )
CASE GetKeyState( VK_MENU )
ENDCASE
DO CASE
CASE nKey = VK_F2
CASE nKey = VK_F3
CASE nKey = VK_F5
CASE nKey = VK_F6
CASE nKey = VK_F7
CASE nKey = VK_F8
CASE nKey = VK_F9
CASE nKey = VK_F11
CASE nKey = VK_F12
CASE nKey = VK_ADD
CASE nKey = VK_SUBTRACT
// how Ctrl + "T"
CASE nKey = 20 // 116 // .AND. lCtrl = .T.
ENDCASE
