IMAP emails auf attachment prüfen

[endeffects]

hallo,

nagut dann bleibt mir wohl ersteinmal nichts anderes übrig
als die email-header auf den string 'multipart/mixed' zu prüfen.

Delphi-Quellcode:

                if SmartPos('multipart/mixed', TheMsg.ContentType, False, 1, True) > 0 then
                    Inbox.Cells[2, i+1] := 'yes'
                else
                    Inbox.Cells[2, i+1] := 'no';

wirklich toll ist die lösung irgendwie nicht