anchor.diff:    AStr:= ini.ReadString(ASection, AKey, AStr);
   end;
   
  -procedure DoLocalize_FormLexerProp(F: TfmLexerProp);
  +{ TfmLexerProp }
  +
  +procedure TfmLexerProp.Localize;
   const
     section = 'd_lex_prop';
   var
  
positive.code:   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.TabSheetGeneral do Caption:= ini.ReadString(section, 'tab_gen', Caption);
      with F.TabSheetComments do Caption:= ini.ReadString(section, 'tab_cmt', Caption);
      with F.TabSheetStyles do Caption:= ini.ReadString(section, 'tab_st', Caption);
      with F.TabSheetNotes do Caption:= ini.ReadString(section, 'tab_not', Caption);
  
      with F.LabelLexerName do Caption:= ini.ReadString(section, 'gen_nam', Caption);
      with F.LabelFileTypes do Caption:= ini.ReadString(section, 'gen_typ', Caption);
      with F.LabelSample do Caption:= ini.ReadString(section, 'gen_smp', Caption);
  
      with F.LabelCmtLine do Caption:= ini.ReadString(section, 'cmt_line', Caption);
      with F.LabelCmtStream do Caption:= ini.ReadString(section, 'cmt_str', Caption);
      with F.LabelCmtFull do Caption:= ini.ReadString(section, 'cmt_full', Caption);
  
      with F.LabelStylesCmt do Caption:= ini.ReadString(section, 'styles_cmt', Caption);
      with F.LabelStylesStrings do Caption:= ini.ReadString(section, 'styles_str', Caption);
  
      with F.LabelColorBg do Caption:= ini.ReadString(section, 'col_bg', Caption);
      with F.LabelColorFont do Caption:= ini.ReadString(section, 'col_fon', Caption);
      with F.LabelColorBorder do Caption:= ini.ReadString(section, 'col_bor', Caption);
  
      with F.LabelBorder do Caption:= ini.ReadString(section, 'bor', Caption);
      with F.LabelBorderL do Caption:= ini.ReadString(section, 'bor_l', Caption);
      with F.LabelBorderR do Caption:= ini.ReadString(section, 'bor_r', Caption);
      with F.LabelBorderT do Caption:= ini.ReadString(section, 'bor_t', Caption);
      with F.LabelBorderB do Caption:= ini.ReadString(section, 'bor_b', Caption);
  
      with F.LabelFontStyles do Caption:= ini.ReadString(section, 'fon_st', Caption);
      with F.chkBold do Caption:= ini.ReadString(section, 'fon_b', Caption);
      with F.chkItalic do Caption:= ini.ReadString(section, 'fon_i', Caption);
      with F.chkUnder do Caption:= ini.ReadString(section, 'fon_u', Caption);
      with F.chkStrik do Caption:= ini.ReadString(section, 'fon_s', Caption);
  
      {
      with F.LabelStyleType do Caption:= ini.ReadString(section, 'typ_', Caption);
      with F.edStyleType do Items[0]:= ini.ReadString(section, 'typ_mi', Items[0]);
      with F.edStyleType do Items[1]:= ini.ReadString(section, 'typ_col_st', Items[1]);
      with F.edStyleType do Items[2]:= ini.ReadString(section, 'typ_col', Items[2]);
      with F.edStyleType do Items[3]:= ini.ReadString(section, 'typ_col_bg', Items[3]);
      }
  
      with F.LabelInfoThemes do Caption:= ini.ReadString(section, 'info_theme', Caption);
  
      DoLocString(msgBorderTypeNone, ini, section, 'bty_none');
      DoLocString(msgBorderTypeSolid, ini, section, 'bty_solid');
  
negative.code:     FChangedLexer: boolean;
      FChangedComments: boolean;
      procedure InitBorder(cb: TCombobox);
      procedure Localize;
      procedure SaveChangedComments;
      procedure SaveChangedLexer;
      procedure SetChangedComments(AValue: boolean);
  