Einzelnen Beitrag anzeigen

AJ_Oldendorf

Registriert seit: 12. Jun 2009
385 Beiträge
 
Delphi 12 Athens
 
#7

AW: Indy Exceptions in der IDE bewusst abschalten

  Alt 27. Jun 2017, 14:58
E.ClassName = Nicht verfügbarer Wert
E.Message = 'Socket-Fehler # 10038Socket-Operation für Nicht-Socket.'#$D#$A

Ich lande im Except Teil von:

Delphi-Quellcode:
procedure TIdConnectThread.Execute;
begin
  try
    FBinding.Connect;
  except
    on E: Exception do begin
                                                                                                       
      FExceptionOccured := True;
      FExceptionMessage := E.Message;
      if E is EIdSocketError then begin
        if (EIdSocketError(E).LastError <> Id_WSAEBADF) and (EIdSocketError(E).LastError <> Id_WSAENOTSOCK) then begin
          FLastSocketError := EIdSocketError(E).LastError;
        end;
      end;
    end;
  end;
end;
  Mit Zitat antworten Zitat