anchor.diff:  
   begin
     LOldHasEdit := HasOneOrMoreEdit;
  -  LState := PTCheckComboItemState(FMultiSearchCheckComboBox.Items.Objects[AIndex]);
  -  if Assigned(LState^.Data) then
  -    TSearchEdit(LState^.Data).EditVisible:=LState^.State=cbChecked
  +  LState := TCheckComboItemState(FMultiSearchCheckComboBox.Items.Objects[AIndex]);
  +  if Assigned(LState.Data) then
  +    TSearchEdit(LState.Data).EditVisible:=LState.State=cbChecked
     else
  -    FSearchEdit.Visible:=LState^.State=cbChecked;
  +    FSearchEdit.Visible:=LState.State=cbChecked;
   
     LNewHasEdit := HasOneOrMoreEdit;
     FTopPanelMultiSearch.Visible := LNewHasEdit;
  
positive.code: 
  procedure TCustomVisualGrid.MultiSearchCheckComboBoxChange(Sender: TObject; AIndex: Integer);
  var
    LState: PTCheckComboItemState;
    LOldHasEdit, LNewHasEdit: boolean;
  
    function HasOneOrMoreEdit: boolean;
  
negative.code: initialization
    {$I *.inc}
  {$ENDIF}
  
  end.
  
  