0

Собственно, как организовать? Делал через IDpop3:

pop3.connect;
POP3.Retrieve(1,IdMessage1);
IDmessage1.SaveToFile('C:\temp.html');
Pop3.Disconnect;

Но в файл сохраняется полный заголовок сообщения (кому, от кого, через кого и тд), без самого тела сообщения.

5
  • в редакторе есть кнопка 101010 для подсветки кода, ну что вы мучаетесь))
    – Sh4dow
    2 окт 2011 в 18:10
  • нет такой кнопки О_о
    – Antiless
    2 окт 2011 в 18:13
  • А если найду?))) 101 010 - вот так она выглядит)
    – Sh4dow
    2 окт 2011 в 18:14
  • вы наверное подумали что есть волшебная кнопка в Delphi редакторе? xDDD
    – user3545
    2 окт 2011 в 18:14
  • а сейчас уже все появилось, в смысле панель форматирования сообщений - раньше её не было О_о
    – Antiless
    2 окт 2011 в 18:47

1 ответ 1

1
pop3.connect;
POP3.Retrieve(1,IdMessage1);
p:=IDMEssage1.MessageParts.Count;
for i:=0 to p-1 do
begin
TidText(idMessage1.MessageParts.Items[i]).body.SaveToFile('C:\temp.txt');
end;
Pop3.Disconnect;

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.