FiveTech Support Forums

Es posible desactivar el Boton de un Btnget ? y activarlo solo cuando el get le introduzcan datos ??

Gracias

Gracias, una duda mas:
@ 1.35, 4 TBTNGET oGet2 VAR nTicket OF oDlg5 ;
SIZE 45, 12 RIGHT ;
RESOURCE "Prop" ;
PICTURE "9999999";
ACTION Cliente1(oLbx,oGet2,oGet3,oGet4);
VALID (Cliente2(@nTicket,oGet2,oGet3,oGet4,oDlg5),Libre) FONT fntArial

En ACTION Cliente1, abro un LIstbox donde el usuario selecciona un registro, al hacerlo pasa el valor al oGet2, pero tiene que darle un enter para salir del oGet2 y entrar al VALID, como hago para evitar ese enter ?, ya intente poner Libre:=.t. oGet2:LostFocus() pero no lo libera, alguna idea ?

Gracias por tu tiempo, aun no he podido hacer que se salga del Get después de seleccionar un dato en un listbox,
¿puedo "mandar" un ENTER desde linea de comando ?? para forzar la salida (tal vez no sea lo mas indicado)

gracias

Muestra un ejemplo simple para testes, porfa. Saludos.

Gracias nuevamente, pongo un ejemplo de la situacion:

Function Menu()
local oDlg1, oLbx1, oGet2, oGet3

 SET 3DLOOK ON          // Microsoft 3D Look

 DEFINE DIALOG  oDlg5 FROM 13,15 TO 38,76 ;
        TITLE "Control de Tickets  " ;

 nTicket:=0
 Libre:=.t.
 @ 0.25, 19.5 TBTNGET oGet2 VAR nTicket OF oDlg1 ;
          SIZE 50, 12             ;
          RESOURCE "Prop"     ;
          PICTURE "9999999";
          ACTION Cliente1(oLbx,oGet2,oGet3);  //F2
          VALID (Cliente11(@nTicket,oGet2,oGet3,oDlg1),Libre)  FONT fntArial

@ 2.55, 4 GET oGet3 VAR nImporte SIZE 45, 11 OF oDlg1 PICTURE "999,999.99" COLOR CLR_BLUE FONT fntArial RIGHT


    ACTIVATE Dialog oDlg5

Return NIL

Function Cliente1(oLbx,oGet2,oGet3)
local oDlg5, oLbx1, oBtn51, oBtn52

 SET 3DLOOK ON          // Microsoft 3D Look

 DEFINE DIALOG  oDlg5 FROM 13,15 TO 38,76 ;
        TITLE "Control de Tickets Sesion: " + Alltrim(Str(xSesion)) ;

    oDlg5:lHelpIcon:=.F.

    SELECT 4
    USE C:\Ventas\Ventas19 Alias aSls SHARED
    Go Top

    TWBrowse():lHScroll:= .F.
    @ .2 , .2 LISTBOX oLbx1 FIELDS Transform(aSls->Ticket,"999999"), Transform(aSls->Importe,"99999.99") ;
            HEADERS   "Ticket      ","Importe";
            FIELDSIZES 80,80;
            SIZE 110, 65 OF oDlg5;
            ON DBLCLICK Captura(oLbx1,oDlg5,oGet2,oGet3) FONT fntArial2

    ACTIVATE Dialog oDlg5

Return NIL

Function Captura(oLbx1,oDlg5,oGet2,oGet3)
nTicket:=aSls->Ticket
nImporte:=aSls->Importe
oGet2:Refresh()
oGet3:Refresh()
oDlg5:End()

    ******AQUI NECESITO QUE AL CERRAR EL DIALOGO SE SALGA DEL oGet2, osea del BtnGet y el Foco Quede en oGet3

Return Nil

Ya lo habia intentado pero no cambia al otro oGet

Donde esta esta FUNCTION Cliente11() ??

Saludos.