JSON数据转GBK
需要把JSON数据部分转成字符串后转GBK编码,不然中文会乱码..请问,怎么转?
void __fastcall TFMain::SaveDD(String yh,String pwd)
{
TStrings *RData = new TStringList();
TStringStream *Stream= new TStringStream();
try {
TJSONObject *Ob = new TJSONObject();
Ob->AddPair(new TJSONPair("SafeTypeID",Xzxh));
Ob->AddPair(new TJSONPair("CarNo",Edt_cph->Text));
Ob->AddPair(new TJSONPair("StartAddress",Edt_cfd->Text));
Ob->AddPair(new TJSONPair("EndAddress",Edt_mmd->Text));
Ob->AddPair(new TJSONPair("UnitNum",Edt_sldw->Text));
String Str_Send = Ob->ToString();
Str_Send = "Data="+Str_Send;
RData->Add(Str_Send);
delete Ob;
String StrUrl = "http://47.104.94.154/GetCall.aspx?UserName=" +yh + "&Password=" + mm + "&Method=Save";
StrUrl = TIdURI::URLEncode(StrUrl);
IdHTTP1->Request->ContentType = "application/x-www-form-urlencoded";
IdHTTP1->Post(StrUrl,RData,Stream);
} catch (...) {
}
delete RData;
delete Stream;
}