Hallo!
Ich habe ein kleines Problem mit dem Pop Komponent, ich rufe mails ab und wenn ich während desen auf "Abbrechen" klicke sollte es aufhören und die Verbindung trennen und das tut es ja auch...
das Problem aber --> ist das nach dem "Disconnecten" diese Meldung kommt "connection closed carfully(oder irgendwie so)"
Wisst ihr was man machen muss, damit diese Meldung nicht angezeigt wird? Unten ein Teil vom Code(das wichtigste)...
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
| try
pop.Connect;
for i := 1 to pop.CheckMessages do begin
Label1.Caption := 'Verbunden hole mir Mails....';
Label2.Caption := pop.BoundIP+'...';
Application.ProcessMessages;
if Stop = true then
begin
Form2.Close;
idMessage1.Clear;
pop.Reset;
pop.DisconnectNotifyPeer;
pop.Disconnect;
Label1.Caption := 'Abgebrochen...';
Label2.Caption := '';
Exit;
end; |
Lg
IceBube
GRACEFULLY
