|
From: Itamar M. L. J. L. <ita...@gm...> - 2014-12-19 03:11:22
|
Hi!
#include "hwgui.ch"
Function main
LOCAL oDlg, cGet := "", oSayA, oSayB
INIT DIALOG oDlg CLIPPER NOEXIT AT 100,100 SIZE 500,200
@ 10,10 get oGet var cGet size 100,30 picture "!!!!!" Valid
{||hwg_msginfo("Valid run only with TAB key!"),.T.}
@ 10,60 say oSay CAPTION "Press TAB Skip to Button and ENTER on Button
Not WORK" size 400,30
@ 10,100 Button oBt Caption 'Confirm' Size 90,30 on click
{||hwg_msginfo("enter key not work only with <SPACE BAR>")}
@ 10,150 say oSayB CAPTION "<ENTER> key not work only with <SPACE BAR>,
after <ENTER> works" size 450,30
ACTIVATE Dialog oDlg
Maybe I create a phantom GET for valid penultimate works :-)) LOL
best regards,
Itamar M. Lins Jr.
|