Danke für den Tipp, damit werde ich mich mal beschäftigen, das hört sich sehr gut an.
Auf die "seltsame Konstruktion" bin ich gekommen, weil im onTimer jeweils der Aufruf der Prüfprozedur (Anzahl E-Mails) erfolgt. Ich wollte ursprünglich nur einen einzelnen Timer für alle Konten verwenden, allerdings hätte das Probleme gegeben, wenn z.B. die Prüfprozedur aufgerufen wird und im nächsten Durchlauf schon wieder ein anderes Konto aufrufen müsste, bevor die letzte Prüfung fertig war. Kann aber auch ein Denkfehler sein, denn ausprobiert habe ich es noch nicht.
@Blup: Den Tag nehme ich nur als fortlaufenden Index, der nicht der Position des Kontos im Array entspricht (sonst müsste ich den bei jedem Löschen auch verändern). Der Tag ist mit dem des Timers identisch, dadurch kann ich allen Timern das gleiche Event zuweisen und darin das Konto ermitteln:
Delphi-Quellcode:
procedure TMCForm.PostPruefenAufruf(Sender: TObject);
begin
PostPruefen(Pred(TTimer(Sender).Tag));
end;
Dann werde ich mich jetzt mal an die Überarbeitung der Lösch-Procedure bzw. die ObjectList machen
