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 解决timage无法在窗体resize时改变canvas的大小

Delphi winapi: getclassname - 获取指定窗口的类名

Delphi 批量操作按钮组件属性

Delphi getcurrentdir 获取当前文件夹

Delphi xe(indy10)tidbytes转ansistring的实现

Delphi inifile to xml

Delphi多级指针

Delphi 判断字符串是否是单词

Delphi winapi: getnextwindow - 获取指定窗口z上或z下的窗口的句柄

Delphi 任务栏显示进度条 createcomobject(clsid_taskbarlist) as itaskbarlist4

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

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