Einzelnen Beitrag anzeigen

Benutzerbild von erich.wanker
erich.wanker

Registriert seit: 31. Jan 2008
Ort: im schönen Salzburger Land
461 Beiträge
 
Delphi XE4 Professional
 
#9

AW: Outlook: Mailadresse der aktuell fokusierten Mail

  Alt 12. Apr 2012, 18:12
.. irgendwie komischer - das Outlook-Dingens ....

Via OutlookApplication1 greif ich nun auf einzelne Outlook-Nachrichten zu.
Ich kann alle möglichen Infos auslesen - NUR NICHT DIE EMALADRESSE DES SENDERS ?


Nachricht.SenderName -> Sendername
Nachricht.Subject -> Subjektname
Nachricht.To_ -> Empfänder eMailadressse

Wo bitte finde ich die "Nachricht.SenderEmailAddress"

Danke
Erich


Delphi-Quellcode:


procedure TForm1.SpeedButton2Click(Sender: TObject);
var
    i : Integer;
    NmSpace : OleVariant;
    Nachricht : MailItem;

Begin
OutlookApplication1.Connect;
NmSpace := OutlookApplication1.GetNamespace('MAPI');
NmSpace.Logon ('', '', False, False);


if OutlookApplication1.ActiveExplorer().Selection.Count > 0 then
    begin
          Nachricht:= OutlookApplication1.ActiveExplorer.Selection.Item(1) as _MailItem;
          label1.Caption:=(
          'Sender : '+Nachricht.SenderName+#13+
          'Subjekt : '+Nachricht.Subject+#13+
          'Mailadresse : '+Nachricht {?????????} +#13+ // <<<<<<<------------- !!!!
          'Empfänger : '+Nachricht.To_);
    end;

end;

end.
Erich Wanker - for life:=1971 to lebensende do begin ..
O
/H\
/ \
  Mit Zitat antworten Zitat