anchor.diff:    *)
   
     DoCloseAllTabs;
  -  DoPyEvent(CurrentEditor, cEventOnExit, []);
  +  DoPyEvent(nil, cEventOnExit, []);
   end;
   
   procedure TfmMain.ButtonCancelClick(Sender: TObject);
  
positive.code:   else
    begin
      MsgStatus(msgStatusClickingLogLine);
      DoPyEvent(Ed, cEventOnOutputNav,
        [SStringToPythonString(SText), IntToStr(ItemProp.Tag)] );
    end;
  end;
  
negative.code: 
  function TfmMain.DoOnConsoleNav(const Str: string): boolean;
  begin
    Result:= DoPyEvent(nil, cEventOnConsoleNav,
      [SStringToPythonString(Str)]) <> cPyFalse;
  end;
  
  