I am integrating Outlook into a Delphi 5 application using Redemption.dll. Generally it all works fine except that
a) Emails created with RDOSession trigger the following message when opened: 'The custom form could not be opened ...' What's going on?
b) I need to change the SenderEmailAddress. It lets me but once the email has been sent the address reverts to the account's email address. HELP!
Thanks in Advance.
My code follows:
a) Emails created with RDOSession trigger the following message when opened: 'The custom form could not be opened ...' What's going on?
b) I need to change the SenderEmailAddress. It lets me but once the email has been sent the address reverts to the account's email address. HELP!
Thanks in Advance.
My code follows:
Code:
OutlookApplication.Connect;
NmSpace := OutlookApplication.GetNamespace('MAPI');
NmSpace.Logon('', '', False, False);
Session := CreateOleObject('Redemption.RDOSession');
Session.MAPIOBJECT := NMSpace.MAPIOBJECT; // OutlookApplication. Session.MAPIOBJECT ;
Mail := Session.GetDefaultFolder(olFolderOutbox).Items.Add('olMailItem');
Mail.Subject := 'test Redemption action';
Mail.BodyFormat := 1;
Mail.Body := 'test body';
Mail.Recipients.Add('[email protected]');
Mail.ReplyRecipients.Add('[email protected]');
Mail.SenderEmailAddress := '[email protected]';
Mail.SenderName := 'SomeName';
Mail.Send;
Last edited: