FiveTech Software tech support forums

Felíz cumpleaños !!!

Que las bendiciones de Dios traigan una pronta y total recuperación de la salud de tu tío. Un abrazo para tí y todos los tuyos.

Otto: This is correct: #include "FiveWin.ch" function Main()    local cGoogleURL := "https://nominatim.openstreetmap.org/search?format=json&q="    local cAddress   := "5th ave, new york"    local aReturn, i, cTxt := ""   // aReturn := hb_jsonDecode( WebPag...

Juan, jugando con SysMenu en MDI y MDICHILD: #include "FiveWin.ch" Function Mains() LOCAL ownd, oMenu MENU oMenu      MENUITEM "1. No Minimize" ACTION Window2( oWnd , 1)      MENUITEM "2. No Maximize" ACTION Window2( oWnd , 2)      MENUITEM "3. No Close" ACTIO...

Al comienzo del procedure/function donde necesitas el atajo colocas SETKEY( VK_F5, { | nKey | RELOGIO()  } ) También lo puede hacer en el ON INIT del Dialog Y al final de mismo procedure/function SETKEY( VK_F5, { | nKey | NIL  } ) Si lo invocaste en el ON INIT del Dialog entonces en el VALID del mis...

Jorge,

HB_STRTOHEX() es de 'Harbour'. Si estás usando 'xHarbour' la function es STRTOHEX()

O puedes hacer:

Carles, Antonio, excelente, son los mejores

Muchas gracias y un fuerte abrazo

Carles, Gracias a tí, a Antonio Linares, y otros colegas más, por tan extraordinario avance. He instalado ModHarbour y TWeb en localhost con XAMPP, seguido todos los ejemplos y hecho otros más, y estoy fascinado como niño con juguete nuevo :D . Qué tan maduro está TWeb con php ? Lo pregunto, pues au...

Armando,

https://code.google.com/archive/p/fivew ... ads?page=9

Felicidades Cristobal !!!

Que tengan una maravillosa y larga vida unidos en el amor

Francisco, a better version :D #include "FiveWin.ch" Function Inicio()    LOCAL oDlg, oGet1, cTxt1, oFont1    cTxt1 := "oGet width for any text"    DEFINE FONT oFont1 NAME "MS Sans Serif" SIZE 0,-10    DEFINE DIALOG oDlg FROM 0,0 TO 200,400 PIXEL       @ 20,10 BUTTON &q...

Francisco, versión mejorada :D #include "FiveWin.ch" Function Inicio()    LOCAL oDlg, oGet1, cTxt1, oFont1    cTxt1 := "oGet width for any text"    DEFINE FONT oFont1 NAME "MS Sans Serif" SIZE 0,-10    DEFINE DIALOG oDlg FROM 0,0 TO 200,400 PIXEL       @ 20,10 BUTTON &q...

Francisco, #include "FiveWin.ch" Function Inicio()    LOCAL oDlg, oGet1, cTxt1, oFont1    cTxt1 := "oGet width for any text"    DEFINE FONT oFont1 NAME "MS Sans Serif" SIZE 0,-10    DEFINE DIALOG oDlg FROM 0,0 TO 200,400 PIXEL        @ 20,10 GET oGet1 VAR cTxt1 OF oDlg ...

Francisco, #include "FiveWin.ch" Function Inicio()    LOCAL oDlg, oGet1, cTxt1, oFont1    cTxt1 := "oGet width for any text"    DEFINE FONT oFont1 NAME "MS Sans Serif" SIZE 0,-10    DEFINE DIALOG oDlg FROM 0,0 TO 200,400 PIXEL        @ 20,10 GET oGet1 VAR cTxt1 OF oDlg ...

Silvio,

\harbour\contrib\hbzebra\

or

\xharbour\contrib\hbzebra\

Regards,