FiveTech Software tech support forums

Antonio,
without FiveWin.ch I got an unresolved external symbol '_HB_FUN_MSGNOYES'!

Frank,

> But when I want to use FiveWin function, e. g. 'MsgNoYes( <cMsg>, <cTitle> ) --> lYesNo', I have to include the FiveWin.ch

If you just want to use some functions, then there is no need to include FiveWin.ch

FiveWin.ch implements the FiveWin commands to manage GUI objects.

Hello Enrico,
ok that works.
I guess because it's a Winapi function!?
But when I want to use FiveWin function, e. g. 'MsgNoYes( <cMsg>, <cTitle> ) --> lYesNo', I have to include the FiveWin.ch.

... Como dice Daniel, puedes solucionarlo asi: //------------------------ Function PuedeSalir(cAlias) local lRet:=.f. IF (cAlias)->(!bof()) if MsgNoYes("Si sale, perderá los datos actuales en edición."+CRLF+; "¿Está seguro de salir?","Advertencia") lRet := .t. ...

... entrega de Equipos" ... ... //----------------------- Function MULTIEQ(oItem1,oItem2,oMenu) local oWndCh, oLbx, oBar, cOldSele:=Select() if !MsgNoYes("ESTA CORRECTA LA HORA Y FECHA DE SU ORDENADOR?","Por Favor confirme") oItem1:Enable();oItem2:Enable();oMenu:Refresh() return nil endif DEFINE ...

... en este ejemplo las funciones ClearImage() es del fivewin ?? Gracias Willi Lubin En MySQL con Eagle1 lo hago asi: Salu2 para almacenar ... .. . If MsgNoyes("Almacenar la Imagen Seleccionada?","Confirme") ClearImage(oImagen) oImagen:LoadBmp(cImagen) oImagen:Refresh() oUpdate := TMSQuery():New( oMySQL ...

En MySQL con Eagle1 lo hago asi: Salu2 para almacenar ... .. . If MsgNoyes("Almacenar la Imagen Seleccionada?","Confirme") ClearImage(oImagen) oImagen:LoadBmp(cImagen) oImagen:Refresh() oUpdate := TMSQuery():New( oMySQL ) cChr := oUpdate:ReadFromFile(cImagen) ...

... SOBRE REGISTROS FUNCTION teclas(nKey, oBrw, cAlias) // VALIDA TECLAS SOBRE xBRW local n=1 DO CASE CASE nKey == VK_DELETE // BORRAR REGISTRO IF MsgNoYes("Desea borrar este registro.?"," ATENCION") (cAlias)->( DBDELETE() ) (cAlias)->( DBPACK() ) oBrw:GOBOTTOM() oBrw:REFRESH() ENDIF CASE ...

... lo borre cuando es cargado desde disco. IF UPPER(::cDocument) <> "OLDMETAFILE" .and. ::lMeta .and. len(::aMeta) > 0 if lSaveMetaF .and. MsgNoYes("Desea guardar fichero(s) metafile(s) (.EMF)?","Elija su opcion") if !lIsDir( cDirSaveMF ) MakeDir( cDirSaveMF ) endif Aeval(::aMeta, {|cFile| ...

Y de eliminacion (Nosotros decidimos no eliminar sino marcar como eliminado) IF MSGNOYES("Está Seguro de Eliminar Este "+cMsg,"Atención...") DO CASE CASE nTipo=1 // RAMO bSeek:={||' UPDATE '+cDTBase+'.DtsRamo '+; ' SET TinStatus = 0'+; ' WHERE '+cDTBase+'.DtsRamo.IntIdDtsRamo ...

... CASE qvz=="VZCONSIS" textpegar:="vzconsis(cnobj , caCod , caTitu )" ENDCASE iF MsgNoYes("la syntax de esta funcion en su editor."+h()+textpegar,"Desea Pegar") oMemo:SetFocus() oMemo:SetSel( 0, 0 ) oMemo:Goto( oMemo:GetLineCount() ...

... CASE qvz=="VZCONSIS" textpegar:="vzconsis(cnobj , caCod , caTitu )" ENDCASE iF MsgNoYes("la syntax de esta funcion en su editor."+h()+textpegar,"Desea Pegar") oMemo:SetFocus() oMemo:SetSel( 0, 0 ) oMemo:Goto( oMemo:GetLineCount() ...

... dialog where the user insert data in a xbrowse. I simply added a VALID clause at the dialog activation where I start a function where I request a MsgNoYes confirm. The problem is that if I press the ESC key when the xBrowse has focus the confirm message appairs twice. Any ideas ? This is a self-contained ...

... Alcide Fuentes y Asociados' CLOCK DATE KEYBOARD Return Nil //**************************************************** Static Function Finaliza() If MsgNoYes(" Salir del Sistema ?","Modulo CXC") DBCOMMITALL() ; DBUNLOCKALL() ; DBCLOSEALL() SET RESOURCES TO Return .T. End Return .F. //***************************************** ...

... Alcide Fuentes y Asociados' CLOCK DATE KEYBOARD Return Nil //**************************************************** Static Function Finaliza() If MsgNoYes(" Salir del Sistema ?","Modulo CXC") DBCOMMITALL() ; DBUNLOCKALL() ; DBCLOSEALL() SET RESOURCES TO Return .T. End Return .F. //***************************************** ...