anchor.diff:    mnuToolbarSortShuffle.Caption:= 'Shuffle lines';
     mnuToolbarSortShuffle.Hint:= 'cuda_sort,shuffle';
     mnuToolbarSortShuffle.OnClick:= @MenuitemClick_CommandFromHint;
  +  mnuToolbarSortRemoveDup:= TMenuItem.Create(Self);
  +  mnuToolbarSortRemoveDup.Caption:= 'Remove duplicate lines';
  +  mnuToolbarSortRemoveDup.Hint:= 'cuda_sort,del_dup';
  +  mnuToolbarSortRemoveDup.OnClick:= @MenuitemClick_CommandFromHint;
  +  mnuToolbarSortRemoveBlank:= TMenuItem.Create(Self);
  +  mnuToolbarSortRemoveBlank.Caption:= 'Remove blank lines';
  +  mnuToolbarSortRemoveBlank.Hint:= 'cuda_sort,del_blank';
  +  mnuToolbarSortRemoveBlank.OnClick:= @MenuitemClick_CommandFromHint;
   
     PopupToolbarSort:= TPopupMenu.Create(Self);
     PopupToolbarSort.Items.Add(mnuToolbarSortAsc);
  
positive.code:   PopupToolbarSort.Items.Add(mnuToolbarSortSep2);
    PopupToolbarSort.Items.Add(mnuToolbarSortReverse);
    PopupToolbarSort.Items.Add(mnuToolbarSortShuffle);
  
    {$ifdef windows}
    UiOps.ScreenScale:= MulDiv(100, Screen.PixelsPerInch, 96);
  
negative.code:     mnuToolbarSortDialog: TMenuItem;
      mnuToolbarSortReverse: TMenuItem;
      mnuToolbarSortShuffle: TMenuItem;
      mnuToolbarSortRemoveDup: TMenuItem;
      mnuToolbarSortRemoveBlank: TMenuItem;
      mnuToolbarSortSep1: TMenuItem;
      mnuToolbarSortSep2: TMenuItem;
      PopupToolbarCase: TPopupMenu;
  