Bug fix VCL

Author: viniciussanchez

src/Horse.Provider.VCL.pas

@@ -292,8 +292,6 @@ class procedure THorseProvider.SetPort(const AValue: Integer);
 class destructor THorseProvider.UnInitialize;
 begin
   FreeAndNil(FIdHTTPWebBrokerBridge);
-  if FEvent <> nil then
-    FreeAndNil(FEvent);
 end;
 
 initialization