请问"=B0=A8=A4=C7=B7j=B4M"是什么字符表现格式??

Question

我是从打开一个繁体网页看到它是类似"=B0=A8=A4=C7=B7j=B4M"这样表现字符的,,  
请各位牛人帮一帮忙,,解答一下.  除了是什么格式外,请告诉一下,怎样转换成繁体中文和简体中文??

Answer 1

用IdDecoderQuotedPrintable 控件解一下看在Indy Disc组件页。

Answer 2

请问,楼上的,INDY在Delphi2006是没有的,可否帮忙查看一下,是什么字符格式??
这个急啊

Answer 3

有點像 quoted-printable編碼.這種編碼常用於郵件編碼的.

Answer 4

function QuotedPrintableEncode(mSource: string): string;
var
  I, J: Integer;
begin
  Result := '';
  J := 0;
  for I := 1 to Length(mSource) do begin
    if mSource[I] in [#32..#127, #13, #10] - ['='] then begin
      Result := Result + mSource[I];
      Inc(J);
    end else begin
      Result := Result + '=' + IntToHex(Ord(mSource[I]), 2);
      Inc(J, 3);
    end;
    if mSource[I] in [#13, #10] then J := 0;
    if J >= 70 then begin
      Result := Result + #13#10;
      J := 0;
    end;
  end;
end; { QuotedPrintableEncode }function QuotedPrintableDecode(mCode: string): string;
var
  I, J, L: Integer;
begin
  Result := '';
  J := 0;
  mCode := AdjustLineBreaks(mCode);
  L := Length(mCode);
  I := 1;
  while I <= L do begin
    if mCode[I] = '=' then begin
      Result := Result + Chr(StrToIntDef('$' + Copy(mCode, I + 1, 2), 0));
      Inc(J, 3);
      Inc(I, 3);
    end else if mCode[I] in [#13, #10] then begin
      if J < 70 then Result := Result + mCode[I];
      if mCode[I] = #10 then J := 0;
      Inc(I);
    end else begin
      Result := Result + mCode[I];
      Inc(J);
      Inc(I);
    end;
  end;
end; { QuotedPrintableDecode }function MBCSToUnicode( //将多字节字符串转换成Unicode编码字符串
  mCodePage: UINT; //对照表页码
  mMBCS: string //多字节字符串
): WideString; //返回处理后的字符串
var
  L: Integer;
begin
  L := MultiByteToWideChar(mCodePage, 0, PChar(mMBCS), -1, nil, 0);
  SetLength(Result, L);
  if L <= 0 then Exit;
  MultiByteToWideChar(mCodePage, 0, PChar(mMBCS), -1, @Result[1], L);
end; { MBCSToUnicode }procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Text := MBCSToUnicode(950,
    QuotedPrintableDecode('=B0=A8=A4=C7=B7j=B4M'));
end;//馬匹搜尋

Answer 5

简体中文 (EUC) EUC-CN x-euc-cn IE5 Win2000 51936 936 
简体中文 (GB2312) gb2312 chinese, CN-GB, csGB2312, csGB231280, csISO58GB231280, GB_2312-80, GB231280, GB2312-80, GBK, iso-ir-58 IE5, IE4 Win95 936 936 
简体中文 (HZ) hz-gb-2312  IE5, IE4 Win95 52936 936 
简体中文 (Mac) x-mac-chinesesimp  IE5 Win2000 10008 936 
繁体中文 (Big5) big5 cn-big5, csbig5, x-x-big5 IE5, IE4 Win95 950 950 
繁体中文 (CNS) x-Chinese-CNS  IE5 Win2000 20000 950 
繁体中文 (Eten) x-Chinese-Eten  IE5 Win2000 20002 950 
繁体中文 (Mac) x-mac-chinesetrad  IE5 Win2000 10002 950