Many thks for you help.
I like too upload this function and other similars to harbour's cvs
Where do you think is the best site to upload it ?
Best regards,
Miguel Angel Marchuet
Przemyslaw Czerpak escribió:
On Tue, 21 Oct 2008, Miguel Angel Marchuet wrote:
Hi Miguel,
Is possible, what do you thing about this function.
Can i use hb_retclenAdopt instead of hb_retclenAdoptRaw in this case ?
or is necessary ?
You have to and in this case you should 1-st fix the conversion code
or it may cause unexpected results like GPF.
Below is corrected version (not tested just written).
best regards,
Przemek
HB_FUNC( UTF8TOWIDE ) // ( cAnsiStr ) -> cWideStr
{
char *cString = hb_parc( 1 );
if( cString )
{
DWORD length;
wchar_t * wString;
length = MultiByteToWideChar( CP_UTF8, 0, cString, -1, NULL, 0 );
wString = ( wchar_t * ) hb_xgrab( ( length + 1 ) * sizeof( wchar_t ) );
MultiByteToWideChar( CP_UTF8, 0, cString, -1, wString, length + 1 );
hb_retclen_buffer( ( char * ) wString, length * sizeof( wchar_t ) );
}
}
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
__________ Informaci�n de ESET Smart Security, versi�n de la base de firmas de virus 3543 (20081021) __________
ESET Smart Security ha comprobado este mensaje.
http://www.eset.com
|
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
