Antonio Linares wrote:Manuel,
El problema seguramente se debe a que no se está inicializando la máquina virtual de Harbour, ya que el punto de entrada de la aplicación no es el de Harbour.
Prueba a poner estas llamadas:
- Code: Select all Expand view
void dummy( void )
{
// hb_cmdargInit( argc, argv );
hb_vmInit( HB_TRUE ); // inicializa la maquina virtual de Harbour
if( symFPH == NULL )
symFPH = hb_dynsymSymbol( hb_dynsymFindName( "DUMMY" ) );
hb_vmPushSymbol( symFPH );
hb_vmPushNil();
hb_vmDo( 0 );
MsgInfo(@"no");
hb_vmQuit(); // termina la maquina virtual de Harbour
}
Antonio no funciona ....
incluso asi casca :
- Code: Select all Expand view
void dummy(void)
{
MsgInfo(@"nono");
hb_vmInit( HB_TRUE ); // inicializa la maquina virtual de Harbour
//if( symFPH == NULL )
// symFPH = hb_dynsymSymbol( hb_dynsymFindName( "MIA" ) );
// hb_vmPushSymbol( symFPH );
//hb_vmPushNil();
// hb_vmDo( 0 );
// hb_vmQuit();
MsgInfo(@"no");
}