procedureTForm1.Button1Click(Sender:TObject) var S:String begin S:=idhttp1.Get(PostURL.text+
procedureTForm1.Button1Click(Sender:TObject) var S:String begin S:=idhttp1.Get(PostURL.text+...
procedureTForm1.Button1Click(Sender:TObject) var S:String begin S:=idhttp1.Get(PostURL.text+...