I can read the mails from outlook from the inbox with
Code: Select all
oOL := TOleAuto():New( "Outlook.Application" )
oNameSpace = oOL:Get( "GetNameSpace", "MAPI" )
oInbox = oNameSpace:Get( "GetDefaultFolder", "6" ) // 6 = Inbox-Folder
Code: Select all
oOL := TOleAuto():New( "Outlook.Application" )
oNameSpace = oOL:Get( "GetNameSpace", "MAPI" )
oInbox = oNameSpace:Get( "GetDefaultFolder", "6" ) // 6 = Inbox-Folder