how can i call "ACTION" of a BUTTON from BUTTONBAR using HotKey
i know bKeyDown but how to "POST" Event to BUTTON as there is no Object, or
- Code: Select all Expand view RUN
- DEFINE WINDOW oWnd FROM 0, 0 TO 1024, 1280 PIXEL TITLE "DBF " + cFile
DEFINE BUTTONBAR oBar SIZE 96,48 OF oWnd
DEFINE BUTTON OF oBar PROMPT "Codepage" ;
TOOLTIP "change Codepage" NOBORDER RESOURCE "MYWORLD" ;
ACTION ( nRec := RECNO(), ;
ChangeCodePage(cPath,cFile,cAlias),;
oBrwDBF:Refresh() ,;
DBGOTO (nRec) )
// where to get Hot-Key from BUTTONBAR ?
oBar:bKeyDown := { | nKey, nFlag | DoBarKEy(nKey, nFlag) }
oWnd:bKeyDown := { | nKey, nFlag | IF( nKey = VK_ESCAPE,oWnd:End(),nil ) }