Problem mit POP-Indy

[cchris]

Hallo,
Ich erhalte bei folgendem Quellcode immer eine Exception:

Delphi-Quellcode:

procedure TForm1.Btn1Click(Sender: TObject);
begin
POP.Host:='******************';
POP.Username:='************';
POP.Password:='*************';
POP.Port:=110;
if not POP.Connected then
        POP.Connect(9000)
                 else
        POP.Disconnect;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if POP.Connected then
                 begin
                 ChkCon.Checked:=true;
                 btn1.caption:='Disconnect';
                 end
                 else
                 begin
                 ChkCon.Checked:=false;
                 Btn1.caption:='Connect';
                 end; 
end;

procedure TForm1.Btn2Click(Sender: TObject);
var num:longint;
    msg:TIdMessage;
begin
msg.Clear;
num:=POP.CheckMessages;
POP.Retrieve(num,msg)

end;

Als Name und Host und PW hab ich natürlich gültige eingetragen, blos will ich die hier nicht zeigen (ach was)

Connecten tut er sich noch ordentlich, allerdings wird in der Zeile mit msg.clear oder falls ich diese auskommentiere in der Retrive Zeile Folgender Fehler auf: ----> unten

Ich hab auch versucht die Clear Anweisung durch

msg.Create(NIL); zu ersetzen, auch dann kommt es zu diesem Fehler.

Vielleicht ist es wichtig, das Delphi "unten" anzeigt, msg ist eventuell nicht Initialisiert.

kann mir jemand helfen?

cu Chris