idhttp的三个问题，熟悉此控件的人请进

2011-02-05 08:14:52 259 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

delphi XE10.4 idhttp post Json中文乱码的处理 delphi XE10.4 idhttp使用TIdMultiPartFormDataStream实现post中文处理阅读详情

编程的环境为BCB 2010
void __fastcall TForm1::Button1Click(TObject *Sender)
{
idhttp->AllowCookies = true;
idhttp->Request->Connection="Keep-Alive";
idhttp->HandleRedirects=true;
TStringStream *ms = new TStringStream();
//AnsiString strUrl = "http://lybase.net";
AnsiString strUrl = "http://www.linuxsir.org/bbs";
idhttp->Get(strUrl, ms);
HtmlData=ms->DataString;
lowerHtmlData=ms->DataString.LowerCase();//POS函数区分大小写，所以需要转为小写
ms->Position=0;
Memo1->Lines->LoadFromStream(ms);
delete ms;
//开始分析html

}

为啥我在访问linuxsir和csdn的时候是乱码的？怎么才能让idhttp自适应，utf8和GB2312的编码？在执行POST操作的时候，如何才能让IDHTTP按我要求的编码发送数据（gb2312或utf8）？
顺便拜个年，大家过年好~~

...全文

【SABRE 3D, SABRE 3DxT,LAM设备】2025年9月12日-生产期间维护用的双重隔离生产期间维护用的双重隔离。该程序用于准备将一个或多个双工位设置为维护状态，同时SABRE 3D/3DxT/3D Scimitar保持生产运行。其目的是在不中断生产的情况下将双工位与运行中的设备隔离。阅读详情

meikeer

网络及通讯开发 1,317 成员 8,874 内容

+ 关注 + 加入社区

切换为时间正序

ThinkHand 2011-02-09

打赏
举报



String url;

url = "http://xxx";

 TStringStream *ss1=new TStringStream("",TEncoding::UTF8,true);

try

{

http1->Get(url, ss1);

}

catch(...)

{

}



ss1->Position = 0;

String txt = ss1->DataString;

 

mmo1->Lines->Text =Utf8ToAnsi(UTF8String(txt) );

delete ss1;

laowang2 2011-02-09

打赏
举报

//GB2312到UTF-8的转换

char* G2U(const char* gb2312)

{

int len = MultiByteToWideChar(CP_ACP, 0, gb2312, -1, NULL, 0);

wchar_t* wstr = new wchar_t[len+1];

memset(wstr, 0, len+1);

MultiByteToWideChar(CP_ACP, 0, gb2312, -1, wstr, len);

len = WideCharToMultiByte(CP_UTF8, 0, wstr, -1, NULL, 0, NULL, NULL);

char* str = new char[len+1];

memset(str, 0, len+1);

WideCharToMultiByte(CP_UTF8, 0, wstr, -1, str, len, NULL, NULL);

if(wstr) delete[] wstr;

return str;

}

laowang2 2011-02-09

打赏
举报

POST的数据用AnsiToUTF8转换一下。

meikeer 2011-02-09

打赏
举报

谢谢楼上几位的回复，可是我在POST数据的时候始终是以utf8编码发送的，有什么办法让它以GB2312编码发送吗？

meikeer 2011-02-07

打赏
举报

是我搞错了Memo1->Lines->CommaText，这样取值时空格会被转成回车。。
第二个问题先不考虑了，因为一个站基本上都会采用同一种编码

麻烦高人再帮我解释一下第三个问题？

meikeer 2011-02-07

打赏
举报

TStringStream *ms = new TStringStream("",TEncoding::UTF8,true);
这样的话，第一个问题倒是解决了，可是为啥memo1里，html语法中的空格为啥都变成了回车符？？

Bosman 2011-02-05

打赏
举报

UTF8编码的数据流要这样
ms=new TStringStream("",TEnocoding::UTF8.....
如果是GB2312的要 new TStringStream("",TEnocoding::Default.....
后面忘了。没在家电脑查不了。
同时如果你这样设置：dhttp->HandleRedirects=true；必须指定一个onredirect函数。否则有可能会出错。

hemiya 2011-02-05

打赏
举报

看网页源代码你可以看到<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
这段代码根据charset自己转换，你转换后显示的就不是乱码了。

hemiya 2011-02-05

打赏
举报

idhttp和编码有毛关系？？？这个只是个http协议。

AnsiString strUrl = "http://www.linuxsir.org/bbs";
idhttp->Get(strUrl, ms);
linuxsir不知道,csdn的是utf8,
idhttp->Get(strUrl, ms);2010的应该是UnicodeString，你前面用的是AnsiString，用UnicodeString试试。

我记得idhttp->Get()还有个TStream *参数的(可以用TMemoryStream)，直接下载数据，那就和字符编码无关了。

idhttp的三个问题，熟悉此控件的人请进

相关推荐