hi, i use a custom pop3 component in my program, and frome time to
time i get this errormessage from the server:

-ERR System temporarily unavailable, please try again later.

on the next connect try i get the "pop3 component not ready" exception,
even if i check for connected:

function TMailAlert.CheckError:boolean;
begin
  result := false;
  with fpop do
   if (errormessage <> '') then begin
     if assigned(FOnError)  then
       FOnError(ErrorMessage);
     ClearErrorMessage;
     result := true;
   end;
end;

procedure TMailAlert.CheckNewMail;
begin
   with FPop do
   if not Connected then
   begin
     Fbusy := true;
     ClearErrorMessage;
     Connect;
   end;
end;

procedure TMailAlert.Pop3ClientRequestDone;
begin
  if (FPop.connected) and (CheckError) then begin
    FPop.quit;
    exit;
  end;  

...

what could be the cause that the component is not ready after the
error ?

TIA, retnyg


ps. pop3prot.pas Version:      2.27

-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to