Sbutton problem with Valid in Get?

Post Reply
User avatar
dutch
Posts: 1395
Joined: Fri Oct 07, 2005 5:56 pm
Location: Thailand

Sbutton problem with Valid in Get?

Post by dutch »

Dear All,

I use FWH707+Sbutton5. Have any one found this TSbutton problem as me? When I use Alt+s for "&Save" the problem is the valid on TGET is skiped. It means any function on TGET Valid do nothing. It is my big problem right now because I use a lot TSbutton in my program.

Thank in advance
Example
======
#include 'Fivewin.ch'
#include 'Tsbutton.ch'

Static oDlg

Procedure Main
local oGet, oBtn, cVar
cVar := 0

DEFINE DIALOG oDlg FROM 0, 0 TO 10, 30 TITLE 'Test TSbutton'

@ 1, 1 GET oGet VAR cVar SIZE 30,12 PIXEL Valid (cVar>0)

@ 40,50 SBUTTON oBtn PROMPT '&Test' ;
SIZE 30, 20 ;
PIXEL ;
ACTION MsgInfo(' Test ')

ACTIVATE DIALOG oDlg CENTER

return
Post Reply