Mail Header auslesen ob Spam oder nicht ???

[marabu]

Hallo Mario,

eine weitere Möglichkeit - falls du den Indy POP3-Client verwendest - wäre das Abholen nur der Kopfzeilen (ungetestet):

Delphi-Quellcode:

var
  msg: TIdMessage;
  n: Integer;
  s: String;
begin
  // ...
  with pop3 do
  begin
    RetrieveHeaders(n, msg);
    s := Copy(Trim(Uppercase(msg.ExtraHeaders.Values['X-Spam-Status'])), 1, 3);
    if s = 'YES' then
      ShowMessage('spam again');
  end;
end;

Grüße vom marabu