Mam pewien problem i nie mam pojęcia o co chodzi... szukałem już chyba wszędzie :/

vMsg->Clear();

 vMsg->Body->Assign(Memo1->Lines); // zawiera tresc typu "wiadomosc testowa"
 vMsg->From->Name = "login";
 vMsg->ReplyTo->EMailAddresses = "login";
 vMsg->Recipients->EMailAddresses = "adresdocelowy";
 vMsg->Subject = "Wiadomosc testowa";
 vMsg->Priority = TIdMessagePriority(0);
 vMsg->CCList->EMailAddresses = "";
 vMsg->BccList->EMailAddresses = "";
 vMsg->ReceiptRecipient->Text = "";
 vMsg->CharSet = "UTF-8";

 vSMTP->Username = "login";
 vSMTP->Password = "haslo";
 vSMTP->Host = "poczta.o2.pl"; //serwer o2.pl
 vSMTP->AuthenticationType = atLogin;
 vSMTP->MailAgent = "The Bat!";

 try {
   if(!vSMTP->Connected()) {
     vSMTP->Connect(150);
     vSMTP->Authenticate();
   }
 } catch(...) {
   mLog->Lines->Add("Connection error");
 }
 if(vSMTP->Connected()) {
   mLog->Lines->Add("Connected");
   try {
     vSMTP->Send(vMsg);
   } catch (...) {
     mLog->Lines->Add("Error sending msg");
   }
 }

Program zgłasza connected a potem wywala wyjątek Error seding msg, a dokładniej:
Kończy się wyjątkiem: " raised exception class EIdProtocolReplyError with message 'Error: queue file write error'.

Ktoś coś wie na ten temat ?
Co lepsze, kod podobny, pisany w delphi wysyła wiadomości bez problemów (przykłady ze strony Indy).