Hallo,
ich erstelle eine Liste der Mails entsprechend:
Delphi-Quellcode:
function ListAllMails( myKonto:Objekte.TMailKonto): boolean;
var
i, nAnzahlMails: LongInt;
cErrMsg, cMsg :
string;
lLoop: boolean;
idMessage1: TIDMessage;
dt: TDateTime;
begin
Result := FALSE;
if myKonto.OpenKontoIMAP(cErrMsg, FALSE)
then begin
if myKonto.idimap41.SelectMailBox('
INBOX')
then begin
nAnzahlMails := myKonto.idimap41.MailBox.TotalMsgs;
lLoop := nAnzahlMails>0;
idMessage1 := TIDMessage.Create;
i := nAnzahlMails;
while lLoop
do begin
myKonto.idimap41.RetrieveHeader(i, idMessage1);
dt := idMessage1.Date;
cMsg := System.SysUtils.Format( '
%d) %s',
[ i , dateTimeToStr(dt)]);
FHaupt_frm.Say(cMsg);
dec(i);
if i<1
then begin
lLoop := FALSE;
end;
end;
result := TRUE;
end;
end;
end;
Die Liste wird auch erstellt, aber es sind Zeitsprünge drin:
siehe: 9883te Mail
| |
| 9892) 12.10.2024 11:10:35 |
| 9891) 12.10.2024 10:15:41 |
| 9890) 12.10.2024 08:01:13 |
| 9889) 12.10.2024 00:29:10 |
| 9888) 11.10.2024 14:36:20 |
| 9887) 11.10.2024 10:56:21 |
| 9886) 11.10.2024 10:20:51 |
| 9885) 11.10.2024 10:18:37 |
| 9884) 11.10.2024 08:58:28 |
| 9883) 24.09.2024 12:29:48 |
| 9882) 24.09.2024 10:58:01 |
| 9881) 11.10.2024 08:22:44 |
| 9880) 11.10.2024 07:13:35 |
| 9879) 10.10.2024 22:39:51 |
| 9878) 10.10.2024 20:43:01 |
| 9877) 10.10.2024 18:44:01 |
| 9876) 10.10.2024 17:25:48 |
| 9875) 10.10.2024 13:17:09 |
| 9874) 10.10.2024 12:11:52 |
| 9873) 10.10.2024 11:56:32 |
| 9872) 10.10.2024 11:09:37 |
| 9871) 10.10.2024 11:04:30 |
| 9870) 10.10.2024 09:01:41 |
| 9869) 10.10.2024 08:17:43 |
| 9868) 10.10.2024 08:01:45 |
| 9867) 10.10.2024 07:15:38 |
Ich nutze dabei:
Delphi 11 Version 28.0.44500.8973
Indy 10.6.2.0
Mail Konto ist bei IONOS
Hat so was schon jemand beobachtet oder eine Idee, woran das liegt?