anchor.diff:      procedure setLive(aClient: TClient; const aValue: Boolean);
       function getLive(aClient: TClient): Boolean;
       procedure signalCursorValues(aClient: TClient; aCursor: TCursor; aPrivateModelSensorEvent: TEventEntry);
  -
     protected
       function IsReceivingLayerUpdates(aClient: TClient): Boolean; override;
       function jsonTimesliderData: string;
  
positive.code:           begin
              layer.handleNewTime(aClient, selectedTime, fPrivateModelSensorEvent);
            end);
        end;
      end);
  
  
negative.code:   endTime := '';
    fillColorPrev := '';
    fillColor := '';
    prevMax := 0;
    cursor := fDataSet.NewCursor;
    try
      TMonitor.Enter(fDataSet);
  