[Delphi] Outlook aansturen via COM *

[Wilde]

Ik heb het volgende stukje code gebruikt, om vanuit Delphi binnen een Exchange omgeving een mail te versturen. Ik moet het van adres mee kunnen geven:


M2 := OutlookApplication1.CreateItem(olMailItem) as MailItem;
M2.AlternateRecipientAllowed := True;
M2.SentOnBehalfOfName := Mailbox_Afzender;
M2.Recipients.Add(StringGrid1.Cells[3,Count]);
M2.CC := (Mailbox_CC);
M2.ReadReceiptRequested := TRUE;
M2.Subject := Mailbox_Subject;
For X := 0 to Memo1.Lines.Count-1 do
M2.Body := M2.Body + Memo1.Lines[x] + #$0D + #$0A;
M2.Attachments.Add(StartupDir+'\'+Mailbox_Attachment,EmptyParam,EmptyParam,EmptyParam);
M2.Send;

Dit werkt prima, echter als de receipent display naam niet klopt(niet geresolved kan worden zegmaar, bv als er een typo instaat) dan komt men delphi prog met een popup: kan een of meerdere namen niet herkennen.

Ik wil graag dat men openstaande Outlook met het popupje komt waar je een bijhorende naam uit de adreslijst kan selecteren. Is dit mogenlijk ?

[LordLarry]

Dit is geen MAPI, maar OLE Automation van Outlook. Ik weet het antwoord niet op je vraag, maar als er een mogelijkheid bestaat om te doen wat jij wilt kan je het vinden in de VBA help van Outlook of op msdn.microsoft.com.

[curry684]

offtopic:
Even titel bijgefixt zodat ie wat toepasselijker is.

[MicroWhale]

Je kunt ook je Delphi-programma alle relaties laten uitlezen en de gebruiker daaruit laten kiezen. Dan kan hij/zij zich niet vergissen en krijg je deze melding niet.

[Wilde]

Leuk idee, je hebt toch zo'n standaard Outlook popupje die je uit het adres boek laat kiezen ? Of is dit alleen aan te spreken dmv mapi ?

Any ideas are welcome

[LordLarry]

Ik betwijfel het, aangezien MAPI een vrij simpel interface is om mailtjes te versturen. Maar nogmaals: Wat jij doet is geen MAPI! En je vraag herhalen brengt je echt niet verder Zoek ondertussen even in de bronnen die ik je gaf of kijk naar de oplossing van Logos.

[bigtree]

Je kan één voor één je adressen laten resolven. Check deze link, hier staat een voorbeeld hoe het vanuit VBA kan, moet vast ook vanuit Delphi kunnen.