anchor.diff:    private
       { private declarations }
       FOnDeleteLexer: TAppStringEvent;
  +    procedure DeletePackagesIniSection(const ALexerName: string);
       procedure Localize;
       procedure UpdateList;
     public
  
positive.code:     DeleteFile(AppFile_Lexer(an.LexerName));
      DeleteFile(AppFile_LexerMap(an.LexerName));
      DeleteFile(AppFile_LexerAcp(an.LexerName));
  
      AppManager.DeleteLexer(an);
      AppManager.Modified:= true;
  
negative.code: end;
  
  
  procedure TfmlexerLib.DeletePackagesIniSection(const ALexerName: string);
  var
    fn: string;
    Ini: TIniFile;
  begin
    fn:= AppDir_Settings+DirectorySeparator+'packages.ini';
    if FileExists(fn) then
    begin
      Ini:= TIniFile.Create(fn);
      try
        Ini.EraseSection('lexer.'+ALexerName+'.zip');
      finally
        FreeAndNil(Ini);
      end;
    end;
  end;
  
  procedure TfmLexerLib.btnDeleteClick(Sender: TObject);
  var
    an: TecSyntAnalyzer;
  