anchor.diff:    DragThresholdTrackBar.OnChange := @doChanged;
     SplitterWidthTrackBar.OnChange := @doChanged;
     //
  +  ShowHeaderCaptionCheckBox.OnChange := @doChanged;
  +  HideHeaderCaptionForFloatingCheckBox.OnChange := @doChanged;
  +  FlattenHeaders.OnChange := @doChanged;
  +  FilledHeaders.OnChange := @doChanged;
  +  //
     HeaderStyleComboBox.OnChange := @doChanged;
     //
     EntitiesConnector.addObserver(self);
  
positive.code: end;
  
  procedure TDockOptionsEditor.doChanged(Sender: TObject);
  begin
    DragThresholdLabel.Caption := adrsDragThreshold +
      ' (' + IntToStr(DragThresholdTrackBar.Position) + ')';
  
negative.code:     ' (' + IntToStr(HeaderAlignLeftTrackBar.Position) + ')';
    SplitterWidthLabel.Caption := adrsSplitterWidth +
      ' (' + IntToStr(SplitterWidthTrackBar.Position) + ')';
    //
    hasHeaders:=ShowHeaderCheckBox.Checked;
    ShowHeaderCaptionCheckBox.Enabled:=HasHeaders;
    HideHeaderCaptionForFloatingCheckBox.Enabled:=HasHeaders;
    FlattenHeaders.Enabled:=HasHeaders;
    FilledHeaders.Enabled:=HasHeaders;
    //
    DockMaster.HeaderFilled := FilledHeaders.Checked;
    DockMaster.HeaderFlatten:= FlattenHeaders.Checked;
    DockMaster.ShowHeaderCaption:= ShowHeaderCaptionCheckBox.Checked;
    DockMaster.HideHeaderCaptionFloatingControl:= HideHeaderCaptionForFloatingCheckBox.Checked;
    //
    SaveToMaster;
  end;
  