anchor.diff:    Result := True;
   end;
   
  +function TOpMultiOperation.AddTxSender(const sender: TMultiOpSender): Boolean;
  +Var senders : TMultiOpSenders;
  +  receivers : TMultiOpReceivers;
  +begin
  +  SetLength(senders,1);
  +  senders[0] := sender;
  +  SetLength(receivers,0);
  +  Result := AddTx(senders,receivers,True);
  +end;
  +
  +function TOpMultiOperation.AddTxReceiver(const receiver: TMultiOpReceiver): Boolean;
  +Var senders : TMultiOpSenders;
  +  receivers : TMultiOpReceivers;
  +begin
  +  SetLength(senders,0);
  +  SetLength(receivers,1);
  +  receivers[0] := receiver;
  +  Result := AddTx(senders,receivers,True);
  +end;
  +
  +function TOpMultiOperation.AddChangeInfo(const changeInfo: TMultiOpChangeInfo): Boolean;
  +Var changes : TMultiOpChangesInfo;
  +begin
  +  SetLength(changes,1);
  +  changes[0] := changeInfo;
  +  Result := AddChangeInfos(changes,True);
  +end;
  +
   destructor TOpMultiOperation.Destroy;
   begin
     SetLength(FData.txSenders,0);
  
positive.code: begin
    inherited Create;
    AddTx(senders,receivers,True);
    AddChangeInfo(changes,True);
    // Protection for "Exit"
    FSignatureChecked:=True;
    FHasValidSignature:=False;
  
negative.code:   Result := True;
  end;
  
  function TOpMultiOperation.AddChangeInfos(const changes: TMultiOpChangesInfo; setInRandomOrder : Boolean): Boolean;
  Var i,j,k : Integer;
  begin
    Result := False;
  