// *********************************************************
// メールデータ削除
// 戻り値 : true 成功, false 失敗
// *********************************************************
BOOL LboxBasp::DelMail( LboxString *LFile )
{
	if ( this->User.operator == ( "" ) ) {
		return false;
	}
	return LboxBasp::DelMail(
		this->User.szLboxString,
		this->Password.szLboxString,
		LFile->szLboxString
	);
}
BOOL LboxBasp::DelMail(
	LboxString *LUser, LboxString *LPass, LboxString *LFile )
{
	return LboxBasp::DelMail(
		LUser->szLboxString,
		LPass->szLboxString,
		LFile->szLboxString
	);
}
BOOL LboxBasp::DelMail(
	LPTSTR lpUser, LPTSTR lpPass, LPTSTR lpFile )
{
	this->ErrorDescription.SetChar(0,0);

	if ( this->lib == NULL ) {
		this->ErrorDescription.operator = (
			"Bsmtp.dll がインストールされていません"
		);
		return false;
	}

	LPFUNC_BPOP3 DllBPOP3;
	LPFUNC_BFreeArray DllBFreeArray;

	DllBPOP3 =
		(LPFUNC_BPOP3)GetProcAddress( lib, "BPOP3" );
	if ( DllBPOP3 == NULL ) {
		return false;
	}
	DllBFreeArray =
		(LPFUNC_BFreeArray)GetProcAddress( lib, "BFreeArray" );
	if ( DllBFreeArray == NULL ) {
		return false;
	}


	int nRet;
	RetArray ra;
	LboxString LString;

	LString.operator = (lpFile);
	LString.StripPath();
	LString.Insert( "DELU " );
	
	this->ErrorDescription.SetChar( 0, 0 );
	nRet = DllBPOP3(
		this->POP3Server.szLboxString,
		lpUser,
		lpPass,
		LString.szLboxString,
		this->RcvDir.szLboxString,
		&ra,
		this->ErrorDescription.szLboxString
	);

	DllBFreeArray(&ra);

	return true;

}