IdPOP3 - Mails werden nicht abgerufen

[Gentleman]

Hallo,

ich versuche über die IdPOP3-Komponente E-Mails von meinem Server abzufragen. Dazu habe ich folgenden Code geschrieben:

Delphi-Quellcode:

var
  pop3: TIdPOP3;
  msg: TIdMessage;
  i: Integer;
begin
  pop3 := TIdPOP3.Create;
  try
    pop3.Host := P3_HOST;
    pop3.Username := P3_USERNAME;
    pop3.Password := P3_PASSWORD;
    pop3.Connect;

    msg := TIdMessage.Create;
    msg.NoDecode := true;

    if pop3.Retrieve(0, msg) then
      ShowMessage(msg.Body.Text);
  finally
    pop3.Disconnect;
  end;
end;

Wenn ich das Programm starte und den Code ausführe, wird zwar mit dem Server fehlerfrei verbunden, aber das abholen der Nachrichten klappt nicht. Ich habe schon im Forum gesucht und auch einige Beispiele dazu gefunden, nach denen ich mich auch gerichtet habe, hatte aber dennoch keinen Erfolg.

Mache ich irgendwo einen Fehler, oder könnte das Problem am Server liegen?


vielen Dank!