A couple of C functions easy to implement:
HB_FUNC ( IS_ANSI )
{
LPBYTE pString = ( LPBYTE ) hb_parc( 1 );
WORD w = 0, wLen = hb_parclen( 1 );
BOOL bAnsi = FALSE;
while( w < wLen && ! bAnsi )
{
bAnsi = pString[ w ] >= 224 && pString[ w ] <= 255;
w++;
}
hb_retl( bAnsi );
}
HB_FUNC ( IS_OEM )
{
LPBYTE pString = ( LPBYTE ) hb_parc( 1 );
WORD w = 0, wLen = hb_parclen( 1 );
BOOL bOem = FALSE;
while( w < wLen && ! bOem )
{
bOem = pString[ w ] >= 128 && pString[ w ] <= 168;
w++;
}
hb_retl( bOem );
}
HTH
Dan