Daten ins stringgrid einlesen

[Natcree]

Rufe emails von einem Server ab und zeige diese über ein Stringgrid an. wenn ich nun neue Emails abrufe dann soll er diese hinzufügen. Klappt aber nicht. Es gibt eine Fehlermeldung.

Die neuen Nachrichten sollen ab der letzten zeile miteingetragen werden.

hier mal der Code zum einlesen

Delphi-Quellcode:

Nachrichtenliste := 0 ;
if idpop31.Connected then Nachrichtenliste:=idpop31.CheckMessages;
if Nachrichtenliste > 0 then
   begin
     for Index := Nachrichtenliste downto 1 do
       begin
         idmessage1.clear;
         idPOP31.RetrieveHeader(Index, IdMessage1);
         Form3.eltreestringgrid1.cells[0,index-1] := IdMessage1.From.Address;
         IdPOP31.Retrieve(index,idMessage1);
         Form3.eltreestringgrid1.cells[1,index-1] := IdMessage1.Subject;
         IdPOP31.Retrieve(index,idMessage1);
         Form3.eltreestringgrid1.cells[2,index-1] := IdMessage1.body.GetText;
         IdPOP31.RetrieveHeader(index,idmessage1);
         Form3.eltreestringgrid1.Cells[3,index-1] := Datetostr(Idmessage1.Date);
         IdPOP31.RetrieveHeader(index,idmessage1);
         Form3.eltreestringgrid1.Cells[4,index-1] := IdMessage1.From.Name;
         IdPOP31.Delete(index);
       end;

Hat jemand einen Rat???