Witam mam taki problem oto kawałek kodu mojej skrzynki pocztowej

if IDPOP31.Connected then IDPOP31.Disconnect ;
IDPop31.Connect ;

iw:=IDPOP31.CheckMessages;

for l:=1 to iw do
begin
IdMessage1.Clear;
IDPOP31.RetrieveHeader(l,IdMessage1);
ListBox1.Items.add(IdMessage1.subject);

iw - to ilosc wszystkich wiadomosci w skrzynce i mam konflikt bo wczytuje mi do mojego list boxa tylko wiadomości nieprzeczytane a nie wszystkie np mam 71 wszystkich wiadomosci a mi wczytuje nieprzeczytanych 56 jak to zrobic zeby wczytywał wszystkie. zgóry dzieki [soczek]