Checklistbox/Pop3 - Error Message ?

[chris]

hi,

erstmal musst du dir die gecheckten mails besorgen, du hast ja bis jetzt nur die header

das würde dann so aussehen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var  i: integer;
begin
  with CheckListBox1 do
  begin
    if Items.Count = 0 then Exit;
    for i := 0 to Items.Count - 1 do if Checked[i] then pop1.retrieve(i)
  end
end;

nun hast du aber ein problem, da du nicht weisst ob i auch der messagenummer auf dem server entspricht.
du hast ja die doppelten einträge nicht in die checkbox übernommen.

du solltest die message nummer (TForm1.ffnen1Click -> i) zwischenspeichern, um hinterher auch zu wissen welche message du abholen willst.

außerdem weißt du nicht ob schon neue mails im postfach liegen die du noch nicht in der checklistbox hast.