anchor.diff:    ( CodePage:        870; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'IBM EBCDIC Multilingual/ROECE (Latin 2); IBM EBCDIC Multilingual Latin 2'),
     ( CodePage:        874; CharSet: THAI_CHARSET;        Converter: TBuffConvHighMap;     Name: 'ANSI/OEM Thai (same as 28605, ISO 8859-15); Thai (Windows)'),
     ( CodePage:        875; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'IBM EBCDIC Greek Modern'),
  -  ( CodePage:        922; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvSingleByte;  Name: '??? CP 922'),
  +  ( CodePage:        922; CharSet: UNKNOWN_CHARSET;     Converter: TBuffConvEstonian922; Name: 'ANSI/OEM Estonian (DOS)'),
     ( CodePage:        932; CharSet: SHIFTJIS_CHARSET;    Converter: TBuffConvShiftJis932; Name: 'ANSI/OEM Japanese; Japanese (Shift-JIS)'),
  -  ( CodePage:        936; CharSet: GB2312_CHARSET;      Converter: TBuffConvSingleByte;  Name: 'ANSI/OEM Simplified Chinese (PRC, Singapore); Chinese Simplified (GB2312)'),
  +  ( CodePage:        936; CharSet: GB2312_CHARSET;      Converter: TBuffConvIBM936;      Name: 'ANSI/OEM Simplified Chinese (PRC, Singapore); Chinese Simplified (GB2312)'),
     ( CodePage:        943; CharSet: SHIFTJIS_CHARSET;    Converter: TBuffConvShiftJis932; Name: '??? CP 943; Japanese (Shift-JIS)'),
     ( CodePage:        949; CharSet: HANGEUL_CHARSET;     Converter: TBuffConvSingleByte;  Name: 'ANSI/OEM Korean (Unified Hangul Code)'),
     ( CodePage:        950; CharSet: CHINESEBIG5_CHARSET; Converter: TBuffConvSingleByte;  Name: 'ANSI/OEM Traditional Chinese (Taiwan; Hong Kong SAR, PRC); Chinese Traditional (Big5)'),
  
positive.code: 
  { TBuffConvEUC_CN }
  
  function TBuffConvEUC_CN.TwoByteDecoder(c1, c2: Byte): WideChar;
  begin
    Result := GB2312DecodeChar(c1, c2);
  
negative.code:   end;
  end;
  
  { TBuffConvLatin1Euro }
  
  //-- BG ---------------------------------------------------------- 03.10.2012 --
  function TBuffConvLatin1Euro.NextChar: WideChar;
  begin
    Result := TBuffChar(GetNext);
    case Ord(Result) of
      $00..$7F:;
      $D5: Result := #$20AC;
    else
      Result := CP850Map[Ord(Result)];
    end;
  end;
  
  { TBuffConvEstonian922 }
  
  //-- BG ---------------------------------------------------------- 03.10.2012 --
  function TBuffConvEstonian922.NextChar: WideChar;
  begin
    Result := TBuffChar(GetNext);
    case Ord(Result) of
      $A0..$AF: Result := CP922_1Map[Ord(Result) - $A0];
      $D0..$DF: Result := CP922_2Map[Ord(Result) - $D0];
      $F0..$FF: Result := CP922_3Map[Ord(Result) - $F0];
    end;
  end;
  
  { TBuffConvISO2022JP }
  
  //-- BG ---------------------------------------------------------- 27.09.2012 --
  