FWH13.06 - xHarbour 1.2.1 - Windows XP
Que error és este?
Erro irrecuperavel 9015
Unhandled Exception
Item de simbolo esperado de hb_vmDo()
Gracias,
Antonio Linares wrote:João,
Basicamente significa que la pila de la maquina virtual está corrupta.
Que código se está ejecutando en ese momento ? Has podido localizarlo ?
Pudiera ocurrir por usar versiones de xHarbour no compatibles.
Antonio Linares wrote:João,
Te aparece la lista completa de llamadas (calls stack) ?
Por favor copiala aqui
#include "FiveWin.ch"
function Main()
local oIE := CreateObject( "Shell.Explorer" )
MsgInfo( oIE:ClassName() )
GeneroError()
return nil
#pragma BEGINDUMP
#include <windows.h>
#include <hbapi.h>
#include <hbapierr.h>
HB_FUNC( GENEROERROR )
{
hb_xfree( 0 );
}
void hb_errInternal( ULONG ulIntCode, const char * szText, const char * szPar1, const char * szPar2 )
{
hb_errRT_BASE( 0, 0, "intentando resolver un error interno", "probando", 0 );
}
#pragma ENDDUMP
#include "FiveWin.ch"
function Main()
GeneroError()
return nil
#pragma BEGINDUMP
#include <windows.h>
#include <hbapi.h>
#include <hbapierr.h>
HB_FUNC( GENEROERROR )
{
hb_xfree( 0 );
}
void hb_errInternal( ULONG ulIntCode, const char * szText, const char * szPar1, const char * szPar2 )
{
hb_errRT_BASE( 0, 0, "intentando resolver un error interno", "probando", 0 );
}
#pragma ENDDUMP
// para harbour
//void hb_errInternal( HB_ERRCODE errCode, const char * szText, const char * szPar1, const char * szPar2 )
/*
Rolando,
Con xHarbour tienes que cambiar esta línea asi:
void hb_errInternal( ULONG ulIntCode, const char * szText, const char * szPar1, const char * szPar2 )
Antonio Liñares
*/
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: Google [Bot] and 38 guests