procedure TForm1.Button1Click(Sender: TObject);
var
LoginInfo:TStrings;
Response:TStringStream;
begin
Response := TStringStream.Create('');
LoginInfo := TStringList.Create;
try
LoginInfo.Clear;
LoginInfo.Add('id='+trim(form1.Edit1.Text));
try
IdHTTP1.Post('http://flash.chinaren.com/ip/id.php',LoginInfo,Response);
except
showmessage('登陆失败');
end;
showmessage(Response.DataString);
finally
LoginInfo.Free;
Response.Free;
end;
end;
为什么我得到应该有的数值?
var
LoginInfo:TStrings;
Response:TStringStream;
begin
Response := TStringStream.Create('');
LoginInfo := TStringList.Create;
try
LoginInfo.Clear;
LoginInfo.Add('id='+trim(form1.Edit1.Text));
try
IdHTTP1.Post('http://flash.chinaren.com/ip/id.php',LoginInfo,Response);
except
showmessage('登陆失败');
end;
showmessage(Response.DataString);
finally
LoginInfo.Free;
Response.Free;
end;
end;
为什么我得到应该有的数值?
解决方案 »
- 请教大家两个问题,一个字符串,一个STringList问题!
- 一个很头疼的问题(类的相互调用)
- 关于Sql Server和程序发布的问题?
- DBComboBox与数据库连接之后,DBComboBox下拉框可以显示所连接数据库的有关信息,但是下拉框中的信息只能浏览不能选中,当电击下拉框中的
- 如何可以和ie共享cookie和收藏夹,ie读取cookie不用直接输入密码就可以访问的这个也可以自动访问
- 有关dll的问题,能不能在dll中利用ado对数据库操作?在线等,,,请看代码,
- 关于OLE数据传输时,报存“储空间不足...”的问题?
- 文件拷贝
- Socket问题??
- 没有.PAS,只有.DCU可以安装控件吗?
- DELPHI截取网络数据包
- 关于在2个界面上操作数据库中同一个表的问题,
在IE里访问http://flash.chinaren.com/ip/id.php?ID=12
"什么也得不到