anchor.diff:    EntitiesConnector.removeObserver(self);
     inherited;
   end;
  +
  +function TCEWidget.getIfModal: boolean;
  +begin
  +  if isDockable then result := false
  +  else result := fModal;
  +end;
  +
   {$ENDREGION}
   
   {$REGION ICESessionOptionsObserver ---------------------------------------------}
  
positive.code:     procedure sesoptBeforeSave; virtual;
      procedure sesoptDeclareProperties(aFiler: TFiler); virtual;
      procedure sesoptAfterLoad; virtual;
    published
      property updaterByLoopInterval: Integer read fLoopInter write setLoopInt;
      property updaterByDelayDuration: Integer read fDelayDur write setDelayDur;
  
negative.code:     property updating: boolean read fUpdating;
      // true by default, allow a widget to be docked.
      property isDockable: boolean read fDockable;
      // not if isDockable, otherwise a the widget is shown as modal form.
      property isModal: boolean read getIfModal;
    end;
  
    (**
  