anchor.diff:    UpdateMenuEnabled(mnuTabMoveF3, (NCur<>8));
     UpdateMenuEnabled(mnuTabMoveNext, (NVis>=2) and (NCur<6));
     UpdateMenuEnabled(mnuTabMovePrev, (NVis>=2) and (NCur<6));
  +  UpdateMenuChecked(mnuTabPinned, Frame.TabPinned);
   end;
   
   procedure TfmMain.PythonEngineAfterInit(Sender: TObject);
  
positive.code:     mnuTabColor.Caption:= 'Set tab color...';
      mnuTabColor.OnClick:= @mnuTabColorClick;
      PopupTab.Items.Add(mnuTabColor);
    end;
  
    DoLocalizePopupTab;
  
negative.code:     F.TabColor:= NColor;
  end;
  
  procedure TfmMain.mnuTabPinnedClick(Sender: TObject);
  var
    F: TEditorFrame;
  begin
    F:= FrameOfPopup;
    if F=nil then exit;
    F.TabPinned:= not F.TabPinned;
  end;
  
  
  procedure TfmMain.mnuTabCopyDirClick(Sender: TObject);
  var
    F: TEditorFrame;
  