void TUpdateSoftware::GetUrl()
{
AnsiString g_Url="http://139.27.18.12:8281/Handler/HandlerGetVerInfo.ashx?AppType=client";
m_pHttp->Request->ContentType = "application/x-www-form-urlencoded";
m_pHttp->Request->AcceptCharSet = "utf-8";
m_pHttp->Request->ContentEncoding = "utf-8";
TMemoryStream *ms=new TMemoryStream();
m_pHttp->Get(g_Url,ms);//g_Url是网页网址
const int msSize=ms->Size;
LPSTR lpBuf=new char[msSize];
ms->Position=0;
ms->Read(lpBuf,msSize);
delete ms;
String const strText=String(lpBuf,msSize);
delete [] lpBuf;
m_strData = strText;
}