Page 1 of 1

Una ayudita con los RADIOS

Posted: Wed Apr 22, 2009 7:09 pm
by acuellar
Hola amigos

Como hago para que cuando un RADIO cambie automáticamente ejecute una ACCION si necesidad de tener un BOTON

Ej:
REDEFINE RADIO nTodCen ID 101,102 OF oDlg1 UPDATE
REDEFINE SAY oSector VAR cSector ID 201 OF oDlg1 UPDATE
REDEFINE RADIO nPenProEje ID 103,104,105 OF oDlg1 UPDATE
REDEFINE BUTTON oBtn ID 106 OF oDlg1 ACTION ( Cambia(oDBF),oBrw1:GoTop(),oBrw1:Update(),oBrw1:SetFocus() )

Quiero que ejecute esta accion
( Cambia(oDBF),oBrw1:GoTop(),oBrw1:Update(),oBrw1:SetFocus() )

Gracias por su colaboracion

Saludos

Adhemar

Re: Una ayudita con los RADIOS

Posted: Wed Apr 22, 2009 7:27 pm
by FranciscoA
Adhemar, talvez este trozo de codigo pueda ayudarte.

//-------------------------------
FUNCTION xxx
local oRadio,uGet, nVAR := 1
local xuGet :={|| if(nVar==3,uGet:=0,uGet:=space(len(movprodt->descrip)))}

REDEFINE RADIO oRadio VAR nVar ID 103,112,104,105,110,111,113 OF oDlg ON CHANGE EVAL(XUGET)

Saludos

Re: Una ayudita con los RADIOS

Posted: Wed Apr 22, 2009 7:47 pm
by acuellar
Gracias Distinguido, eso era lo que necesitaba, lo logré

Saludos desde Santa Cruz de la Sierra

Adhemar