2016-09-28 10 views
0

実行時にクラスが作成されました。実行時にTRESTClientコンポーネントに問題があります。エラー:GUID [{}]のインターフェイスを持つピアが登録されていません

TFrwWebServiceREST = class(TInterfacedObject, IRESTWebServiceProxy) 
strict private 
    FClientRest: TRESTClient; 
    FRequestRest: TRESTRequest; 
    FResponseRest: TRESTResponse; 
private 
    FURL: string; 
public 
    procedure SetPassword (Const APassword: string); 
    procedure SetPort (Const APort: Integer); 
    procedure SetServer (Const AServer: string); 
    procedure SetUserName (Const AUserName: string); 

    procedure AddParam (AName: string; AValue: string = ''); 
    function GetParamValue (AParamName: string): string; 

    procedure Executar; 
    constructor Create (AUrl: string); virtual; 
    Destructor Destroy; override; 
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; 

エラーは必ずしも発生しない...プロセスは完全に動作し、しばらくしてからこのエラーが発生します。 RESTClientの作成時に例外が発生します。それは何でしょうか?おかげで..

答えて

4

これは、インターフェイスにIPPeerClientを含める必要がありますインターフェイスにIPPeerServerを含めるためにあなたのクライアントコードでの句とは、サーバーのコード内の句「を使用しています」「使用する」、 http://blogs.embarcadero.com/pawelglowacki/2013/01/10/39958

を参照してください。
関連する問題