Buen dia foro,
Existe algun ejemplo de programa donde el codigo o parte de el este almacenado en un campo de tabla y sea llamado desde el ejecutable o por alguna opcion de menu?
FWH 25.12
Harbour/Hbmk2
Microsoft Visual C++
MySql 8.0
Antigravity
Function reportesejecutable()
texto:="function Test()" + CRLF + CRLF + " MsgInfo( 'Hello world!' )" + CRLF + CRLF + "return nil"
Execute( texto )Saludos
Puedes ver las funciones HRB*() que ejecuta programas PRG, ademas tambien permite compilar modulos HRB (similar a funciones en DLLS)
function Execute( cCode, ... )
local oHrb, cResult, bOldError, uRet
local cFWheaders := If( lIsDir( ".\include" ), ".\include", "c:\FWH\include" )
local cHBheaders := If( lIsDir( ".\include" ), ".\include", "c:\harbour\include" )
// FReOpen_Stderr ( "comp.log", "w" )
oHrb = HB_CompileFromBuf( cCode, "-n", "-I" + cFWheaders, "-I" + cHBheaders )
if ! Empty( oHrb )
BEGIN SEQUENCE
bOldError = ErrorBlock( { | o | DoBreak( o ) } )
uRet = hb_HrbDo( hb_HrbLoad( oHrb ), ... )
END SEQUENCE
ErrorBlock( bOldError )
endif
return uRetGracias Antonio
Lo pruebo y comento.
Antonio Buenas Tardes...
Que pena molestar.... estuve tratando de usar la funcion execute() que proporciona fw, as铆 como lo mencionaste, se compila perfectamente, pero al momento de hacer el llamado de la funcion execute. Me arroja un msginfo que dice lo siguiente:
this feature is only available with Harbour.
Es obvio el mensaje.... Pero yo uso xharbour. Y en este momento requiero ejecutar c贸digo almacenado en un archivo de texto o desde una base de datos. Que pena el atrevimiento pero de casualidad tienes un ejemplo mas claro.
Saludos
Leandro,
Es que solo Harbour permite hacer eso pues el compilador entero est谩 dentro de una librer铆a.
xHarbour no tiene esa capacidad.
Antonio buenos d铆as
Ya logre compilar mi aplicaci贸n con Harbour.....
Ahora deseo agregar la opci贸n para correr los prg por fuera del ejecutable; dices que miremos el c贸digo en el m茅todo runscript()... En el siguiente enlace.
https://bitbucket.org/fivetech/fivewin- ... ivedit.zip
El problema es que el enlace esta roto.
