Ocultar destinatarios

[Casimiro Noteví]

Empezado por maxvera

[..]
if Mail.Values['to'] <> '' then begin Receip.ulReserved := 0; Receip.ulRecipClass := MAPI_TO; Receip.lpszName := StrNew(PChar(Mail.Values['to']));
Receip.lpszAddress := StrNew(PChar('SMTP:' + Mail.Values['to']));
Receip.ulEIDSize := 0;
MapiMessage.nRecipCount := 1;
MapiMessage.lpRecips := @Receip;
end;[FONT=verdana,geneva,lucida,'lucida grande',arial,helvetica,sans-serif]
[..][/font]

Te lo confirmo mañana desde el trabajo, porque tengo el código allí, pero tiene algo que ver con:

if Mail.Values['to'] <> '' then begin

Que será algo así como:

if Mail.Values['bcc'] <> '' then begin