為什么用idhttp取到的網站,用utf8toAnsi轉換后,還是有些特殊字符亂碼-有解無憂

雖然大部份的中文已經解出,但是還有有幾個亂碼,
如何把54936改成65001,就完整的把UTF8顯示出來了

可我想不用這種方式,直接轉還有別的辦法能不出現小亂碼嗎??





IdHTTP1 := TIdHTTP.Create;

ss := TStringStream.Create('', TEncoding.GetEncoding(54936));//默認為gb18030

idhttp1.Get('www.jobui.com',ss);//任意UTF8網站都這樣

 Memo1.text:= LowerCase(ss.DataString);//轉出的字符全部統一小寫



Memo2.text:=utf8toAnsi( Memo1.text);

uj5u.com熱心網友回復：

  IdHTTP1 := TIdHTTP.Create;

  try

    Memo1.Text:= Utf8ToAnsi(IdHTTP1.Get('http://www.jobui.com'));

  finally

    IdHTTP1.Free;

  end;

這樣并未發現亂碼。

uj5u.com熱心網友回復：

參考 1 樓 pathletboy 的回復:

  IdHTTP1 := TIdHTTP.Create;

  try

    Memo1.Text:= Utf8ToAnsi(IdHTTP1.Get('http://www.jobui.com'));

  finally

    IdHTTP1.Free;

  end;

這樣并未發現亂碼。

樓上兄弟,你試一下2010版,全是亂碼

uj5u.com熱心網友回復：

參考 2 樓 cowboooo 的回復:

Quote: 參考 1 樓 pathletboy 的回復:
  IdHTTP1 := TIdHTTP.Create;

  try

    Memo1.Text:= Utf8ToAnsi(IdHTTP1.Get('http://www.jobui.com'));

  finally

    IdHTTP1.Free;

  end;
這樣并未發現亂碼。
樓上兄弟,你試一下2010版,全是亂碼

2007(不含)以后，包括控制元件默認編碼是unicode了，你一轉，自然是亂碼。

uj5u.com熱心網友回復：

也就是說，2007(不含)以后，顯示unicode的編碼，直接如下即可

  IdHTTP1 := TIdHTTP.Create;

  try

    Memo1.Text:= IdHTTP1.Get('http://www.jobui.com');

  finally

    IdHTTP1.Free;

  end;

uj5u.com熱心網友回復：

參考 4 樓 pathletboy 的回復:

也就是說，2007(不含)以后，顯示unicode的編碼，直接如下即可

  IdHTTP1 := TIdHTTP.Create;

  try

    Memo1.Text:= IdHTTP1.Get('http://www.jobui.com');

  finally

    IdHTTP1.Free;

  end;

這樣是可以,但是碰到GB2312的網頁,顯示就會亂碼..

uj5u.com熱心網友回復：

參考 6 樓 cowboooo 的回復:

Quote: 參考 4 樓 pathletboy 的回復:
也就是說，2007(不含)以后，顯示unicode的編碼，直接如下即可
  IdHTTP1 := TIdHTTP.Create;

  try

    Memo1.Text:= IdHTTP1.Get('http://www.jobui.com');

  finally

    IdHTTP1.Free;

  end;
這樣是可以,但是碰到GB2312的網頁,顯示就會亂碼..

參考 6 樓 cowboooo 的回復:

Quote: 參考 4 樓 pathletboy 的回復:
也就是說，2007(不含)以后，顯示unicode的編碼，直接如下即可
  IdHTTP1 := TIdHTTP.Create;

  try

    Memo1.Text:= IdHTTP1.Get('http://www.jobui.com');

  finally

    IdHTTP1.Free;

  end;
這樣是可以,但是碰到GB2312的網頁,顯示就會亂碼..

你都能區別網頁編碼了，那就區別分情況轉。

  IdHTTP1 := TIdHTTP.Create;

  try

    html:= IdHTTP1.Get('http://0512aj.cn');

    if IdHTTP1.Response.CharSet <> 'utf-8' then

      html := AnsiToUtf8(html);

    Memo1.Text := html;

  finally

    IdHTTP1.Free;

  end;

uj5u.com熱心網友回復：

UTF8轉ANSI是什么概念, 轉的時候要注意的是, 能夠裝在 UTF8里的水, 是不能裝在籃子ANSI里的, 只能裝到水桶ANSI里.
ANSI就是只能裝一種東西的容器, 所以不同語言有不同的ANSI. 不是同一種東西.

uj5u.com熱心網友回復：

剛剛完美解決類似問題：
uses
IdURI;
......

Respon:=TidURI.URLDecode(Http.Get(TIdURI.URLEncode(URLStr)));

這樣URLStr就不需要自己去編碼和解碼了，很好用，支持中西結合文，呵呵

uj5u.com熱心網友回復：

參考 9 樓 doloopcn 的回復:

剛剛完美解決類似問題：
uses
IdURI;
......

Respon:=TidURI.URLDecode(Http.Get(TIdURI.URLEncode(URLStr)));

這樣URLStr就不需要自己去編碼和解碼了，很好用，支持中西結合文，呵呵

支持。。。。

uj5u.com熱心網友回復：

IdURI 在C++builder 怎么使用？

uj5u.com熱心網友回復：

參考 9 樓 doloopcn 的回復:

剛剛完美解決類似問題：
uses
IdURI;
......

Respon:=TidURI.URLDecode(Http.Get(TIdURI.URLEncode(URLStr)));

這樣URLStr就不需要自己去編碼和解碼了，很好用，支持中西結合文，呵呵

學到了

uj5u.com熱心網友回復：

別用那個IDhttp了，問題太多了

轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/53668.html

標籤：非技術區

上一篇：請問有高手用delphi搞過“Credential Provider”么？

下一篇：從Delphi2010遷移到XE3的程式編譯大小