Error al crear TRESTClient: "No se ha registrado ningún par con la interfaz con guid [{}]"
He creado mi clase para trabajar con REST. Tengo un problema con el componente TRESTClient en tiempo de ejecución.
TFrwWebServiceREST = class(TInterfacedObject, IRESTWebServiceProxy)
private
FClientRest: TRESTClient;
FRequestRest: TRESTRequest;
FResponseRest: TRESTResponse;
public
constructor Create (AUrl: string); virtual;
end;
...
constructor TFrwWebServiceREST.Create(AUrl: string);
begin
FClientRest := TRESTClient.Create (AUrl); //the error occurs here
FClientRest.AcceptEncoding := 'UTF-8';
FResponseRest := TRESTResponse.Create (nil);
FResponseRest.ContentEncoding := 'UTF-8';
FRequestRest := TRESTRequest.Create (nil);
FRequestRest.AcceptEncoding := 'UTF-8';
FRequestRest.Response := FResponseRest;
FRequestRest.Client := FClientRest;
end;
El error no siempre ocurre ... El proceso funciona perfectamente, y luego de un tiempo, este error comienza a ocurrir.
Excepción de primera oportunidad a $ 7656C54F. La clase de excepción EIPAbstractError con el mensaje 'No se ha registrado ningún par con la interfaz con guid {B8BD5BD8-C39D-4DF1-BB14-625FC86029DB}'.
La excepción se genera al crear RESTClient. ¿Qué puede ser?