IdMessage读取eml内容报

本文整理自网络，侵删。

 用IdMessage读取eml文件的时候，body的内容为：This is a multi-part message.

解决办法：

uses IdText;

for j := IdMessage.MessageParts.Count-1 downto 0 do
begin
if (IdMessage.MessageParts[j] is TIdText) and 
(IdMessage.MessageParts[j].ContentType = 'text/html') then
begin
memo1.text := (IdMessage.MessageParts[j] as 
TIdText).Body.Text;
Break;
end;
end;
 

相关阅读 >>

Delphi urunpe

Delphi 怎么将一个流转换成字符串？或者将字符串转出一个流

Delphi pchar和array [0..255] of char的区别

Delphi动态创建tadoquery加access出现'不正常的定义参数对象 提供了不一致或不完整的信息'错误

Delphi 让程序支持外来文件拖放的单元文件

Delphi 给变量加引号

Delphi xe7中获得os平台和版本

Delphi xe 无法编译apk提示sdk路径问题时？sdk路径配置方法

Delphi vclzip实现分卷压缩

Delphi 调用外部程序并等待其运行结束

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » IdMessage读取eml内容报