WD20 - send email through outlook not in html

Hello,
I did a little test trying to send an email using the local Outlook.

When I look at the email in the send-items everything looks normal.
However the receiver does NOT see the body in html but in plain text.
In this testcase I am the receiver, using the same Outlook to see the incoming mail. And I have the same problem. The body is in plain text showing all html-markup as text

What's wrong with this (simplified) code?

	myEmail is Email
        nOutlookSessionID is int = EmailStartOutlookSession("")
	Add(myEmail.Recipient,"blabla@gmail.com")
	myEmail.Subject = "Email title"
	myEmail.Message = "Email content"
	myEmail.HTML = RTFToHTML(EDT_NoName1)
	EmailSendMessage(nOutlookSessionID,myEmail)