anchor.diff:    params: TStringList;
     Frame: TEditorFrame;
     NLine, NColumn, i: integer;
  +  bReadOnly: boolean;
   begin
     if not IsAllowedToOpenFileNow then Exit;
   
  
positive.code:     for i := 0 to params.Count - 1 do
      begin
        SFilename := params[i];
        if SFilename='' then Continue;
        SParseFilenameWithTwoNumbers(SFilename, NLine, NColumn);
        //if dir, open in ProjManager
        if DirectoryExistsUTF8(SFilename) then
  
negative.code:       if FileExistsUTF8(SFilename) then
        begin
          Frame:= DoFileOpen(SFilename, '');
  
          if Assigned(Frame) and (NLine>0) then
            Frame.DoGotoPos(Frame.Ed1, NColumn-1, NLine-1);
  
          if Assigned(Frame) and bReadOnly then
            Frame.ReadOnly[Frame.Ed1]:= true
        end;
      end;
    finally
  