get都能获得服务端,服务端处理完你get的请求就会返回的一个字符串,看看这个字符串的内容就可以判断了
var
  ss: TStringStream;
begin
  ss := TStringStream.Create('');
  idHTTP1.get(url, ss);
  ss.Position := 0;
  ShowMessage(ss.DataString);// 看看这个字符串的内容,根据它来判断是否成功
  ss.Free;
end;
;不过这个异常压根就是没发成功,你用try 来包裹一下

解决方案 »

  1.   

    http协议返回的是几零几这种数字的都是服务器端返回的,4和5打头的都是错误了,4打头说明服务器认为是你的错,5打头说明服务器认为是自己的错,403是说服务器理解了你的意思,但是这个事情不被允许执行。
      

  2.   

    -------------------------------------------------------------这是我的代码,
    procedure TForm1.Button1Click(Sender: TObject);
    var
      ss: TStringStream;
    begin
    try
      ss := TStringStream.Create('');
      idHTTP1.get(url, ss) ;
      ss.Position := 0;
      ShowMessage(ss.DataString);// 看看这个字符串的内容,根据它来判断是否成功
     ss.Free;
      except
      on EConvertError do
    showmessage('处理失败!');end;
      end;
    处理不成功,还是程序崩溃。