anchor.diff:      FontDesc := '#Label1';
       Hint := '';
       ImageName := '';
  -    TabOrder := 5;
  +    TabOrder := 3;
       OnClick :=@btnSearchDirAddClicked;
     end;
   
  
positive.code:     Anchors := [anLeft,anRight,anTop];
      FontDesc := '#Label1';
      Hint := '';
      TabOrder := 10;
      Text := 'Open files with contents expanded';
    end;
  
  
negative.code:     FontDesc := '#Label1';
      Hint := '';
      ImageName := '';
      TabOrder := 4;
    end;
  
    chkEscapeIPFSymbols := TfpgCheckBox.Create(tsGeneral);
  