Using CreateOleObject('Outlook.Application') causes “Server execution failed” error

Hi,

We have written an application in Delphi XE3 that sends emails via Outlook OLE. FYI - see source code.

It has been working perfectly well for years until I upgraded to Windows 10.

Now I get "Server execution failed" whenever my Outlook 2013 is running.
Of course it works when Outlook is not running.

It also works when I run both my EXE as well as Outlook as Administrator. BUT, when I do this outlook complains when I try to create emails (Outlook doens't like being run as Administrator).

Here is a link which explains a lot about what is happening. http://stackoverflow.com/questions/29338902/using-createoleobjectoutlook-application-causes-server-execution-failed-er

I just want to run my EXE as "normal" and Outlook as "normal" - ie not as administrator.
But it is not working. Why?

How can I make sure both processes run in the same security context?
xxx.txt

LVL 1

enigmasolutionsAsked: 2016-08-31

Who is Participating?

LVL 28

Sinisa VukCommented: 2016-10-28

May my advice to (not so ) similar question helps?

LVL 19

xtermieCommented: 2016-09-01

Maybe this documentation can help you out:
https://support.microsoft.com/en-us/kb/257757

LVL 1

enigmasolutionsAuthor Commented: 2016-09-04

Hi xtermie, I couldn't see anything that would help.

How can I determine or set the security context that my program and outlook run in?

LVL 1

enigmasolutionsAuthor Commented: 2016-11-11

Hi Sinisa, Your comment looks very good. My first test to do similar to your idea still did not work. But I will further investigate the other ideas / links. Thank you.

This still did not work - the GetActiveOleObject failed.

try
OutlookApp := GetActiveOleObject('Outlook.Application');
except
OutlookApp := CreateOleObject('Outlook.Application');
end;