Indy10 и почтовые заголовки

Как извлечь заголовки с помощью Indy10 из писем? Имею ввиду "детали" письма.

ОТВЕТ:

РАЗ:

Фрагмент кода для получения электронных писем:

procedure SprawdzEMail(login: string; serwer: string; haslo: string; port: word = 110);
var
  idPop3: TIdPop3;
  idMessage: TidMessage;
  ile, i: integer;
begin
  idMessage := TidMessage.Create(nil);
  idPop3 := TIdPop3.Create(nil);

  IdPOP3.Host     := serwer;
  IdPOP3.Username := login;
  IdPOP3.Password := haslo;
  idPOP3.Port     := port;
  idPOP3.Connect;
  ile := idPOP3.CheckMessages;
    for i := 1 to ile do
    begin
      idPOP3.Retrieve(i, idMessage);
      idPOP3.Delete(i);
      idMessage.Clear;
    end;

    idPOP3.Disconnect;

  idMessage.Free;
  idPop3.Free;
end;

ДВА:

Копайте в сторону этого :
TIdMessage.Headers
TIdMessage.ExtraHeaders