anchor.diff:      LexerName: string;
       procedure DoLoad;
       procedure DoSave;
  +    procedure Localize;
       procedure UpdateList;
     public
       { public declarations }
  
positive.code:   s.BorderTypeBottom:= s2.BorderTypeBottom;
  end;
  
  procedure DoLocalize_FormLexerStylesMap(F: TfmLexerStyleMap);
  const
    section = 'd_lex_map';
  var
    ini: TIniFile;
    fn: string;
  begin
    fn:= GetAppLangFilename;
    if not FileExists(fn) then exit;
    ini:= TIniFile.Create(fn);
    try
      with F do Caption:= ini.ReadString(section, '_', Caption);
      with F.ButtonPanel1.OKButton do Caption:= msgButtonOk;
      with F.ButtonPanel1.CancelButton do Caption:= msgButtonCancel;
      with F.LabelLex do Caption:= ini.ReadString(section, 'st_lex', Caption);
      with F.LabelTh do Caption:= ini.ReadString(section, 'st_th', Caption);
      with F.btnSet do Caption:= ini.ReadString(section, 'set_sel', Caption);
      with F.btnSetNone do Caption:= ini.ReadString(section, 'set_non', Caption);
      with F.btnClear do Caption:= ini.ReadString(section, 'set_un', Caption);
    finally
      FreeAndNil(ini);
    end;
  end;
  
  
  function DoApplyLexerStylesMap(an: TecSyntAnalyzer; out anNotCorrect: TecSyntAnalyzer): boolean;
  var
  
negative.code: 
  procedure TfmLexerStyleMap.FormCreate(Sender: TObject);
  begin
    Localize;
    ItemsLex:= TStringlist.Create;
    ItemsTh:= TStringlist.Create;
    ItemsVal:= TStringlist.Create;
  