Hallo Leute!
Ich spiele grade ein wenig mit den Pop3-Indy-Komponenten herum und habe ein Problem dem ich nicht auf die Schliche komme
Hintergrund:
Ich will mit RetrieveHeader() den Header checken. Ich habe als MailNr. "1" angeben und mir zuvor eine TestMail geschickt. Nun starte ich mein Programm und es kommt die Meldung:
"Access violaton at adresss 00414CB8 in module 'Project1.exe'."
Ich habe keine Ahnunf was ich machen soll. Wenn ich anstatt der "1" eine "0" oder eine Zahl > 1 eintrage, kommt logischerweise eine Message das keine solche Mail gefunden wurde.
Ich teste das ganze bei GMX.
Der SourceCode ist dieser:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure TForm1.Button1Click(Sender: TObject);
var idMessage1 : TIdMessage;
begin
IdPOP31.Host := Edit1.text;
IdPOP31.Port := StrToInt(Edit2.text);
IdPOP31.Username := Edit3.text;
IdPOP31.Password := Edit4.text;
IdPOP31.Connect;
IdPOP31.RetrieveHeader(1, idMessage1);
IdPOP31.Disconnect;
end; |
Könnt ihr mir helfen?
