activate BUTTON ACTION Codeblock via F2 - F9

[Jimmy]

hi,

my BUTTON have a Caption which can be used as Hotkey using ALT + Key
now i like to use F2 - F9 to activate BUTTON

i can use o:bKeyDown Codeblock Slot to call a Functrion and use VK:* Key to identify

how to EVAL() ACTION Codeblock e.g. for VK_F2

Code: Select all  Expand view

   DEFINE BUTTONBAR oBar SIZE nPart, 48 BOTTOM OF oWnd

         DEFINE BUTTON OF oBar PROMPT "F2 &Filter" ;
                    GROUP BTNRIGHT ;
                    TOOLTIP "SET Filter" ;
                    NOBORDER RESOURCE "MYFILTER" ;
                    ACTION Filter( oBrwDBF )

   @  0,  2 XBROWSE oBrwDBF COLUMNS ColsNumber() ...
   ...
   oWnd:bKeyDown := { | nKey, nFlag | DoBrowseKey( nKey, nFlag, oWnd, oGet, oBar ) }

Code: Select all  Expand view

PROCEDURE DoBrowseKey( nKey, nFlag, oWnd, oGet, oBar )

   DO CASE
      CASE nKey = VK_ESCAPE
         oWnd:End()
      CASE nKey = VK_F2
         // how to EVAL() ACTION of F2 ?

[cnavarro]

Try with

Code: Select all  Expand view

Eval( oBar:aControls[ 01 ]:bAction )
 

[Jimmy]

hi,

Try with

Code: Select all  Expand view

Eval( oBar:aControls[ 01 ]:bAction ) 

ah, yes
thx for Answer