FiveTech Software tech support forums

... OF oDlg ACTIVATE TIMER oTimer Retur nil // // VERIFICO SI SALGO DEL SISTEMA Function VerSiSalgo() Local SiNo IF SiNo:=MsgNoYes("Esta seguro que desea salir del sistema?","Por favor, seleccione") SalgoSN:=.t. Return .t. ELSE SalgoSN:=.f. Return .f. ...

Saludos al foro: Estoy probando la clase METRO y tengo los siguientes detalles Hay un botón para salir de la aplicación de manera controlada con el MsgNoYes( "Desea salir ?"), pero si doy clic izquierdo fuera de cualquier botón, la aplicación se cierre sin más, cómo obligo a que pase por ...

José Luis, Es un viejo requerimiento de Fwh. IMHO, sólo hay dos opciones: 1.- Crear un set de funciones alternativas a msginfo, msgyesno, msgnoyes, msgstop, etc, basado en un dialogo... Alguna vez vi algo asi en el foro 2.- Tirar de C y usar la funcion setfont aplicada a los objetos text de ...

... )       oServer:Rollback()    END    oServer:lThrowError := FALSE //aca lo desactivo    IF lGrabado       NuevoPrestamo_MostrarNumero()       IF MsgNoYes( "Desea imprimir contrato del prestamo?" )          NuevoPrestamo_Imprimir()       ENDIF       IF lRestructuracion          oDlgE:End() ...

... )       oServer:Rollback()    END    oServer:lThrowError := FALSE //aca lo desactivo    IF lGrabado       NuevoPrestamo_MostrarNumero()       IF MsgNoYes( "Desea imprimir contrato del prestamo?" )          NuevoPrestamo_Imprimir()       ENDIF       IF lRestructuracion          oDlgE:End() ...

Hello, Hope first of all you are doing well. I would like to make two requests for the Xbrowse() function please: - Use FWstrings to translate MsgNoYes( "Delete Record?" ), ITEMS { "Search For", "Show Only" } ;, etc. the rest of messages. - Make the size of the dialog ...

... _SqlClean( cItem ) + [',] cSqlIns += MemoRead( cCft + aImages[nX1,1] ) cSqlIns += [)] TRY oSql:Open( cSqlIns, xCONNECT ) nAdded++ CATCH oError IF MsgNoYes( "Unable to Perform Table Update, Process Aborted." + cEol + oError:Description + cEol + cSqlIns + cEol + xCONNECT, Ptitle ) MemoWrit( ...

... _SqlClean( cItem ) + [',] cSqlIns += MemoRead( cCft + aImages[nX1,1] ) cSqlIns += [)] TRY oSql:Open( cSqlIns, xCONNECT ) nAdded++ CATCH oError IF MsgNoYes( "Unable to Perform Table Update, Process Aborted." + cEol + oError:Description + cEol + cSqlIns + cEol + xCONNECT, Ptitle ) MemoWrit( ...

... la actualización del ejecutable: Verifico que exista el nuevo ejecutable y si existe, llamo al programa que actualiza: FUNCTION Actualizar() If !MsgNoYes( "El sistema se actualizará, está usted seguro de realizar este proceso?","Confirme" ) Return NIL EndIf ShellExecute( 0, ...

... nX1, 5, "C" ) IF (nId<1) .AND. (EMPTY(cSourceLang)) .AND. (EMPTY(cSourceText)) nBad++ ENDIF IF (nBad>10) EXIT ENDIF nTotRec++ IF MsgNoYes(cSourceText + cEol + cDestText) EXIT ENDIF // Insert... IF (nId>0) .AND. (!EMPTY(cSourceLang)) .AND. (!EMPTY(cSourceText)) nBad := 0 lSql ...

... aBitMap[01] ) 2. On our home screen, I would display a logo with the following code and now the logo has disappeared ACTIVATE WINDOW oWnd ; VALID MsgNoYes( "Do you want to Exit " + PA[04] + "?" ) ; ON PAINT ( PalBmpDraw( hDC, (oWnd:nHeight/2-oBmp:nHeight/2)-50,(oWnd:nWidth/2-oBmp:nWidth/2), ...

... release of font when font clause is used. * Enhancement: Unicode support for common messageboxesm MsgInfo(), MsgAlert(), MsgStop(), MsgYesNo(), MsgNoYes(), MsgRetryCancel(), MsgAbout(), MsgRun, MsgWait(). MsgText and Title can be any combination of UTF8/ANSI. Buttons are shown in the default ...

... release of font when font clause is used. * Enhancement: Unicode support for common messageboxesm MsgInfo(), MsgAlert(), MsgStop(), MsgYesNo(), MsgNoYes(), MsgRetryCancel(), MsgAbout(), MsgRun, MsgWait(). MsgText and Title can be any combination of UTF8/ANSI. Buttons are shown in the default ...

karinha Muchas Gracias por Responder...

Efectivamente funciono..... Pero ahora me surge otra duda.

Resulta que coloque un msgNoYes("Confirma?"), si el usuario dice si, se sale del proceso.
Pero si dice no el mensaje se repite hasta que finaliza ciclo...

Alguna idea de como solucionarlo?

... in function MSGYESNO Warning W8065 C:\Compiladores\FWH(10.6)\source\winapi\msgbox.c 90: Call to function 'hb_parni' with no prototype in function MSGNOYES Warning W8065 C:\Compiladores\FWH(10.6)\source\winapi\msgbox.c 104: Call to function 'hb_parni' with no prototype in function MSGRETRYCANCEL ...