Actually, how to organize? Did through IDpop3:

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

But the full message header is saved in the file (to whom, from whom, through whom, etc.), without the message body itself.

  • in the editor there is a button 101010 for highlighting the code, well, what are you suffering)) - Sh4dow
  • There is no such button O_o - Antiless
  • And if I find it?))) 101 010 - this is how it looks) - Sh4dow
  • You probably thought that there is a magic button in the Delphi editor? xDDD - Zowie
  • and now everything has appeared, in the sense of the message formatting panel - before it was not O_o - Antiless

1 answer 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;