AMsgDecoder.Headers.Add('content-transfer-encoding=base64');
    AMsgDecoder.Headers.Values['content-disposition'] := 'inline';
    iPos := AMsgDecoder.Headers.IndexOf('content-type');