FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Ayuda para Validar un Boton
Posts: 719
Joined: Fri May 12, 2017 02:50 PM

Ayuda para Validar un Boton

Posted: Tue Nov 19, 2019 04:10 PM
Amigos

Muy buen dia.

Estoy con problemas y no doy con la logica, Tengo un Boton BTNBMP, en el cual debo enviar a 2 funciones:

1. Validar que todos los datos se encuentren ingresado y validados, devuelve .T. o (.F. Y El mensaje del Error) " Graba_Hora()"
2. Cuando esta Function retorne .T., entonces debo mandar a Generar Agenda. "Calcula_Dias()"
3. Calcula_Dias(), Solo se debe ejecutar si Graba_Hora() es .T.

Muchos Saludos.
Antonio

El Codigo del Boton:
Code (fw): Select all Collapse
    @ 290,50 BTNBMP  SIZE 55,50 PROMPT "AGENDA" OF oDlg2 PIXEL 2007 Resource "#8032" FONT oFont1 ;
                    ToolTip "VALIDA AGENDA" ;
                    ACTION IF(!Graba_Hora(Cod_Dia1,Hor_Ini1,Hor_Fin1,Frecu1,Can_Pac1),(MsgInfo( Mensa ),.F.),(Calcula_Dias(),oDlg2:Refresh()))
FWH 22.10 - HARBOUR - PELLES C
Posts: 6755
Joined: Wed Feb 15, 2012 08:25 PM

Re: Ayuda para Validar un Boton

Posted: Tue Nov 19, 2019 08:17 PM
Cualquiera de las dos opciones del IF debe devolver un valor lógico, veo que la primera devuelve .F., pero la segunda no, quizás asi funcione
Code (fw): Select all Collapse
(Calcula_Dias(),oDlg2:Refresh(), .T. )
Cristobal Navarro

Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo

El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
Posts: 719
Joined: Fri May 12, 2017 02:50 PM

Re: Ayuda para Validar un Boton

Posted: Tue Nov 19, 2019 09:31 PM

Hola Cristobal

Como siempre atento y dispuesto a ayudar.

Funciono Perfecto.

Muchas gracias.
Antonio

FWH 22.10 - HARBOUR - PELLES C

Continue the discussion