topic-43137

Board index FiveWin for Harbour/xHarbour activate BUTTON ACTION Codeblock via F2 - F9

Posts: 1772

Joined: Thu Sep 05, 2019 05:32 AM

activate BUTTON ACTION Codeblock via F2 - F9
Posted: Tue May 02, 2023 03:38 PM

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 (fw): Select all Collapse

    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 (fw): Select all Collapse

 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 ?

greeting,

Jimmy

cnavarro

Posts: 6755

Joined: Wed Feb 15, 2012 08:25 PM

Re: activate BUTTON ACTION Codeblock via F2 - F9
Posted: Tue May 02, 2023 04:11 PM

Try with

Code (fw): Select all Collapse

Eval( oBar:aControls[ 01 ]:bAction )

Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces

Jimmy

Posts: 1772

Joined: Thu Sep 05, 2019 05:32 AM

Re: activate BUTTON ACTION Codeblock via F2 - F9
Posted: Tue May 02, 2023 04:40 PM

hi,

cnavarro wrote:Try with
Code (fw): Select all Collapse
Eval( oBar:aControls[ 01 ]:bAction )

ah, yes
thx for Answer

greeting,

Jimmy

FiveTech Support Forums

Continue the discussion