clientsocket errorcode:=0 setzen! aber wie ?

[pacman1986]

Nicht sauer sein habs ^^

Delphi-Quellcode:

    Client := Tclientsocket.Create(Self);
    Client.OnError := clienterror;

Delphi-Quellcode:

procedure TThreadping.clientError(Sender: TObject; Socket: TCustomWinSocket;
  ErrorEvent: TErrorEvent; var ErrorCode: Integer);
begin
  Errorcode := 0;
end;

ha falsch gesucht ^^