FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Ayuda con funci贸n I2HEX
ricardog
Posts: 158
Joined: Tue Oct 11, 2005 03:10 PM
Ayuda con funci贸n I2HEX
Posted: Tue Sep 05, 2017 02:50 AM
Buenas noches, tengo un modulo para que utiliza la funci贸n I2HEX, pero me manda el siguiente error de ejecuci贸n.
[IMG]http://img220.imagevenue.com/loc617/th_558997966_ErrorI2HEX_122_617lo.jpg" alt="" loading="lazy">[/img]

Y mi proyecto contiene la FIVEHC.LIB

[img=http://img237.imagevenue.com/loc471/th_559347689_errormaindllp.c_122_471lo.jpg]" alt="" loading="lazy">

Gracias por su ayuda. :-) :-) :-)
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Ayuda con funci贸n I2HEX
Posted: Tue Sep 05, 2017 07:21 AM

I2Hex() es una funci贸n de FWH

Que versi贸n de FWH est谩s usando ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
ricardog
Posts: 158
Joined: Tue Oct 11, 2005 03:10 PM
Re: Ayuda con funci贸n I2HEX
Posted: Tue Sep 05, 2017 09:57 PM

Buenas tardes Antonio, FWHX 9.11

Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Ayuda con funci贸n I2HEX
Posted: Wed Sep 06, 2017 05:55 AM
Necesitas actualizarte a una versi贸n m谩s reciente

Mientras tanto aqui tienes el c贸digo:
Code (fw): Select all Collapse
static char * u2Hex( WORD wWord )
{
    static far char szHex[ 5 ];

    WORD i= 3;

    do
    {
        szHex[ i ] = 48 + ( wWord & 0x000F );

        if( szHex[ i ] > 57 )
            szHex[ i ] += 7;

        wWord >>= 4;

    } while( i-- > 0 );

    szHex[ 4 ] = 0;

    return szHex;
}

//----------------------------------------------------------------------------//

HB_FUNC( I2HEX ) // nValue --> cHexValue
{
  hb_retc( u2Hex( hb_parni( 1 ) ) );
}
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions