#include  
#include  
In my code... 
TMemo* mInfo; 
// Code 
bool MyForm::sendMail () 
{ 
bool result = true; 
if (mInfo->Lines->Count && 
!reg->getMailAddress ().IsEmpty () && 
!reg->getMailFrom ().IsEmpty () && 
!reg->getMailHost ().IsEmpty ()) 
{ 
TNMSMTP* SMTP = new TNMSMTP(0); 
try 
{ 
SMTP->PostMessage->FromName = "Argumentario"; 
SMTP->PostMessage->ToAddress->Add (reg->getMailAddress ()); 
SMTP->PostMessage->FromAddress = reg->getMailFrom (); 
SMTP->Host = reg->getMailHost (); 
SMTP->PostMessage->Subject = "Argumentario Report"; 
SMTP->PostMessage->Body->Text = mInfo->Text; 
SMTP->Connect(); 
SMTP->SendMail(); 
} 
catch (Exception& E) 
{ 
report ("Imposible enviar e-mail: "   E.Message); 
result = false; 
} 
delete SMTP; 
} else 
{ 
report ("No se encuentra configurado el env甐 del mail."); 
} 
return result; 
}