[Hwgui-developers] Navigating between objects of a dialog.

[Itamar M. L. J. L. <ita...@gm...>]

Hi!

#include "hwgui.ch"

Function main
local oDlg, cGetA := 0, lCheck

  INIT DIALOG oDlg CLIPPER NOEXIT TITLE "TAB != ENTER behavior!" AT 0,0
SIZE 640,480

    @  5,10 get oGetA Var cGetA size 100,25 picture "@E 999,999.99"

    @  5,40 get CheckBox oCheck VAR lCheck Caption 'CheckBox' size 130,25

    @  5,70 say oSay1 CAPTION "If you use ENTER key focus not exit in
penultimate object of DIALOG" size 630,20
    @  5,90 say oSay2 CAPTION "now use TAB for change objects and see!, If
I use NOEXIT close dialog without clicking buttom" size 630,20

    @  5,120 Button oBt Caption 'Save Data'  Size 100,30 On Click
{||hwg_msginfo("My Function of save data")}


   oDlg:Activate(,,,.T.)

CLIPPER flag is for simulate ENTER == TAB key and not is equal behavior.

Best regards,
Itamar M. Lins Jr.