Hallo Assertor,
so, das ganze hat mir jetzt ja keine Ruhe gelassen, interessanterweise hat
RetrieveAllEnvelope keine Daten zurückgeliefert, auser auf der INBOX selber, aber jede andere Mailbox kamen keine Daten, erst nachdem ich eine kleine Modifikation in der
idIMAP4.pas vorgenommen habe, mir ist aufgefallen das dort ein IMAP4Commands[cmdFetch] fehlt. Sobald ich das einfüge geht es, es betrifft übrigens beide Varianten die RetrieveAllEnvelope und die UIDRetrieveAllEnvelope
In der function
TIdIMAP4.RetrieveAllEnvelopes steht:
Delphi-Quellcode:
SendCmd (NewCmdCounter, ( IMAP4Commands[cmdFetch] + ' 1:* (' + {Do not Localize}
IMAP4FetchDataItem[fdEnvelope] + ')'), [] ); {Do not Localize}
Ändert man es in:
Delphi-Quellcode:
SendCmd (NewCmdCounter, ( IMAP4Commands[cmdFetch] + ' 1:* (' + {Do not Localize}
IMAP4FetchDataItem[fdEnvelope] + ')'), [IMAP4Commands[cmdFetch]] ); {Do not Localize}
dann geht es, das gleiche mit der
TIdIMAP4.UIDRetrieveAllEnvelopes
Delphi-Quellcode:
SendCmd (NewCmdCounter, ( IMAP4Commands[cmdUID] + ' ' + IMAP4Commands[cmdFetch] + ' 1:* (' + {Do not Localize}
IMAP4FetchDataItem[fdEnvelope] + ')'), [] ); {Do not Localize}
ändern in:
Delphi-Quellcode:
SendCmd (NewCmdCounter, ( IMAP4Commands[cmdUID] + ' ' + IMAP4Commands[cmdFetch] + ' 1:* (' + {Do not Localize}
IMAP4FetchDataItem[fdEnvelope] + ')'), [IMAP4Commands[cmdFetch]] ); {Do not Localize}
Soweit ich weiss sind die Entwickler der
Indy Komponenten hier auch vertreten, oder??
Gruß
Jörg