New Outlook 2024 do not create "email drafts" as it use to create before in classic version

This Delphi code use to work before switching to new 2024 outlook version:

try

OutlookApp := GetActiveOleObject('Outlook.Application');

except

OutlookApp := CreateOleObject('Outlook.Application');

end;

try

MailItem := OutlookApp.CreateItem(olMailItem);

MailItem.Subject := 'Email Subject Here..';

MailItem.Body := 'Email Body Here..';

_emailAddress := '*** Email address is removed for privacy ***';

MailItem.Recipients.Add(_emailAddress);

MailItem.Display();

finally

OutlookApp := VarNull;

end;

Now after switching it fails to load and does not show the draft. Error Message Shown is : 'Server execution failed, ProgID: "Outlook.Application"'.

When I switch back to classic version, it shows draft email without any issue. Basically we want Email Draft to be created when a button is clicked from UI.

How can we fix this issue in latest version of new outlook?