1

TIDText タイプの TIDMessagePart オブジェクトの Body.Text プロパティの読み取り可能な部分を抽出しようとしています。以下のコードのようなもの。ただし、TIDText メッセージ パーツの ContentType が text/plain ではなく、text/html である場合、sBody がすべての HTML タグで埋められます。読みやすいテキストが欲しいだけですが、バージョン 9 ライブラリでそれを取得する方法がわかりません。何か不足していますか？

var メール: TIDMessage; sBody: 文字列;

...

for j := 0 to Pred(email.MessageParts.Count) do
begin
if email.MessageParts.Items[j] is TIdText then
begin
    sBody := TIdText(email.MessageParts.Items[j]).Body.Text;
end;
end;
4

1 に答える 1

2

HTML を手動で解析して、必要なプレーン テキストを抽出する必要があります。 TIdMessageは単なるデータのメール コンテナーであり、文字セット変換を処理する以外に、本文の内容を解析することはありません。コンテンツを自分で解析する必要があります。

于 2013-01-18T22:52:47.660 に答える