// *********************************************************
// 文字列の中の半角カナを全角カナに変換
// 戻り値 : true 成功, false 失敗
// *********************************************************
BOOL LboxBasp::HankanaToZen( LboxString *LHan, LboxString *LZen )
{
	return HankanaToZen(
		LHan->szLboxString,
		LZen
	);
}
BOOL LboxBasp::HankanaToZen( LPTSTR lpHan, LboxString *LZen )
{

	BOOL bRet;
	IBasp21Ptr pBasp;
	_bstr_t Han(lpHan);
	_bstr_t Ret("");

	bRet = true;
	int nErr = 0;

	pBasp	= NULL;
	try {
		TESTHR(pBasp.CreateInstance(__uuidof(Basp21)));
		nErr++;

		Ret.operator = (pBasp->HAN2ZEN( Han ));
		nErr++;

		LZen->operator = ((LPTSTR)Ret);

		pBasp.Release();
		pBasp = NULL;
	}
	catch (_com_error &e)
	{
		if ( nErr >= 1 ) {
			pBasp.Release();
			pBasp = NULL;
		}
		bRet = false;
	}

	return bRet;
}