Einzelnen Beitrag anzeigen

soulies

Registriert seit: 9. Dez 2005
234 Beiträge
 
#3

AW: MapiSendMail, Festellen welcher Empfänger angegeben wurde

  Alt 23. Jan 2013, 14:58
hoi,

du könntest evtl. auch MAPIAddress zusätzlich aufrufen.

Das öffnet den Dialog zum hinzufügen von Empfängern.
Du kannst deine Liste übergeben und anzeigen und erhälst am Ende
eine finale Liste (also falls der User einen Empfänger hinzugefügt hat).

in etwa so ...
Delphi-Quellcode:
    if Mail.Values['to'] <> 'then
    begin
      Receip.ulReserved := 0;
      Receip.ulRecipClass := MAPI_TO;
      Receip.lpszName := StrNew(PAnsiChar(AnsiString(Mail.Values['to'])));
      Receip.lpszAddress := StrNew(PAnsiChar(AnsiString('SMTP:' + Mail.Values['to'])));
      Receip.ulEIDSize := 0;
      MapiMessage.nRecipCount := 1;
      MapiMessage.lpRecips := @Receip;
    end;

    MapiAddress( MAPI_Session,
                 Handle,
                 'Empfänger',
                 1, // ein Textfeld nur fuer "To"
                 '',
                 1, // deine bisherige anzahl
                 Receip, // deine bisherige liste
                 0 ,
                 0 ,
                 @new_count, // neue anzahl
                 new_list ); // neue liste
    MapiMessage.nRecipCount := new_count ;
    MapiMessage.lpRecips := new_list;

    AttachCount := 0;
vielleicht kannst Du damit weiter arbeiten.


cya
  Mit Zitat antworten Zitat