anchor.diff:    Callback: THproseCallback2;
     ResultType: PTypeInfo;
     ByRef: Boolean; Simple: Boolean);
  -begin
  -  TAsyncInvokeThread2.Create(Self, Name, Args, Callback, nil, ResultType, ByRef, Normal, Simple);
  +var
  +  ErrorEvent: THproseErrorEvent;
  +begin
  +  ErrorEvent := nil;
  +  TAsyncInvokeThread2.Create(Self, Name, Args, Callback, ErrorEvent, ResultType, ByRef, Normal, Simple);
   end;
   
   procedure THproseClient.Invoke(const Name: string; var Args: TVariants;
  
positive.code: procedure THproseClient.Invoke(const Name: string; var Args: TVariants;
    Callback: THproseCallback1;
    ResultMode: THproseResultMode; Simple: Boolean);
  begin
    TAsyncInvokeThread2.Create(Self, Name, Args, Callback, nil, nil, False, ResultMode, Simple);
  end;
  
  procedure THproseClient.Invoke(const Name: string; var Args: TVariants;
  
negative.code:   Callback: THproseCallback2;
    ByRef: Boolean;
    ResultMode: THproseResultMode; Simple: Boolean);
  var
    ErrorEvent: THproseErrorEvent;
  begin
    ErrorEvent := nil;
    TAsyncInvokeThread2.Create(Self, Name, Args, Callback, ErrorEvent, nil, ByRef, ResultMode, Simple);
  end;
  
  procedure THproseClient.Invoke(const Name: string; var Args: TVariants;
  