🚀 go-pugleaf

Hi. I wrote this code for sending mails with TMapiMessage.
All works perfectly, but error is equal 0 also if I canceled the dialog box.
It returns always SUCCESS_SUCCESS instead of MAPI_E_USER_ABORT.
May some one know why??

I am using it with BCB6

Thanks for every suggestion!

Mauro

Follow code:

//************************
 TMapiMessage Messaggio;
 Cardinal Errore;

 TMapiRecipDesc destinatario;
 destinatario.ulReserved = NULL;
 destinatario.ulRecipClass = MAPI_TO;
 destinatario.lpszName = "NYL";
 destinatario.lpszAddress = "sapere@tin.it";
 destinatario.ulEIDSize = NULL;
 destinatario.lpEntryID= NULL;

 TMapiFileDesc allegato;
 allegato.ulReserved = NULL;
 //allegato.flFlags = NULL;
 allegato.nPosition = (Cardinal)(0xFFFFFFFF);
 //char st[255];
 //sprintf (st, "%s\\%s", GetCurrentDir().c_str(), meseRif.c_str());
 String st;
 st.sprintf("%s\\%s", GetCurrentDir(), meseRif);
 allegato.lpszPathName = st.c_str();
 allegato.lpszFileName = NULL;

 String nome = "Tariffazione periodo "+eMese->Text;
 Messaggio.ulReserved = 0;
 Messaggio.lpszSubject = nome.c_str();
 Messaggio.lpszNoteText = "Ciao";
 Messaggio.lpszMessageType = NULL;
 Messaggio.lpszDateReceived = NULL;
 Messaggio.lpszConversationID = NULL;
 Messaggio.flFlags = 0;
 Messaggio.lpOriginator = NULL;
 Messaggio.nRecipCount = 1;
 Messaggio.lpRecips = &destinatario;
 Messaggio.nFileCount = 1;
 Messaggio.lpFiles = &allegato;
 Errore = MapiSendMail(0, reinterpret_cast<unsigned
int>(Application->Handle),
          Messaggio, MAPI_LOGON_UI | MAPI_NEW_SESSION, 0);   //MAPI_DIALOG |

 if (!Errore)
   Application->MessageBox("La tariffazione � stata inoltrata con
cuccesso!", "Tariffazione", MB_OK | MB_ICONEXCLAMATION);
 else Application->MessageBox("Non � stato possibile inoltrare la
tariffazione!", "Tariffazione", MB_OK | MB_ICONINFORMATION);