Amigos,
Alguem sabe se é possível desativar a tecla F10 do windows?
Digo isso porque estou enfrentando problemas no meu sistema (DIALOG, TSBROWSE, etc) não funciona o F10.
Obrigado
#include "FiveWin.ch"
function Main()
local oWnd
DEFINE WINDOW oWnd TITLE "Test"
SetKey( VK_F10, { || NIL } )
SetKey( VK_F2, { || MsgInfo( "'F2' is beeing pressed" ) } )
oWnd:bKeyDown = { | nKey | MsgInfo( "Down: " + Str( nKey ) ) }
oWnd:bKeyChar = { | nKey | MsgInfo( "Char: " + Str( nKey ) ) }
ACTIVATE WINDOW oWnd
return nil
#include "FiveWin.ch"
function Main()
local oWnd
DEFINE WINDOW oWnd TITLE "Test"
//-> Tecla Reservada Para Windows, uso nao recomendavel.
SetKey( VK_F10, { || MsgInfo( "'F10' is beeing pressed-Reserved for Windows" ) } )
SetKey( VK_F2, { || MsgInfo( "'F2' is beeing pressed" ) } )
oWnd:bKeyDown = { | nKey | MsgInfo( "Down: " + Str( nKey ) ) }
oWnd:bKeyChar = { | nKey | MsgInfo( "Char: " + Str( nKey ) ) }
ACTIVATE WINDOW oWnd
return nil
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: cmsoft and 100 guests