anchor.diff:    Callback: THproseCallback1;
     ResultMode: THproseResultMode; Simple: Boolean);
   begin
  -  Invoke(Name, Args, Callback, nil, nil, ResultMode, Simple);
  +  Invoke(Name, Args, Callback, THproseErrorEvent(nil), nil, ResultMode, Simple);
   end;
   
   procedure THproseClient.Invoke(const Name: string; const Args: array of const;
  
positive.code:   Callback: THproseCallback1;
    ResultType: PTypeInfo; Simple: Boolean);
  begin
    Invoke(Name, Args, Callback, nil, ResultType, Normal, Simple);
  end;
  
  procedure THproseClient.Invoke(const Name: string; var Args: TVariants;
  
negative.code:   Callback: THproseCallback1;
    ResultMode: THproseResultMode; Simple: Boolean);
  begin
    Invoke(Name, Args, Callback, THproseErrorEvent(nil), nil, ResultMode, Simple);
  end;
  
  procedure THproseClient.Invoke(const Name: string; var Args: TVariants;
  