delphi用GET方法向WEB提交数据。谢谢

Question

URL地址：http://127.0.0.1/get.asp?a=123
         返回数据：123456
      
如何用DELPHI做一个程序，将123提交到这个URL上，并显示出返回的数据
请各位高手给出一个最简单的例子就可以了
小弟是新手，如果复杂了，也看不懂。

Answer 1

idhttp
http://blog.csdn.net/flashrhx2007/archive/2008/08/28/2843977.aspx

Answer 2

uese Comobj;procedure Upload;
var
  url:string;
  xmlHttp:Olevariant;
  responseText:Widestring;
begin
  CoInitialize(nil);
  url:='http://127.0.0.1/get.asp?a=123';      try
        xmlHttp:=CreateOleObject('Msxml2.XMLHTTP');
        xmlHttp.open('GET',url,false);
        xmlHttp.send();
        responseText:=xmlHttp.responseText;
        if xmlHttp.status='200' then
        begin
          showmessage(responseText);
        end;
      finally
        xmlHttp:= unAssigned;
      end;
  CoUninitialize;
end;

Answer 3

hongqi162----
不好意思，我可能没有说明白，a=123，123是做为参数提交的，它是从edit1.text当中取到的，然后我一点按钮，就把当中取的值给提交上去

Answer 4

var
  repStr: string;
begin
  try
    //repstr就是返回数据
    repstr := idhttp1.get('http://127.0.0.1/get.asp?a=' + edit1.text);
  except  end;
end;