procedure TForm1.Button1Click(Sender: TObject);
Begin
RStream:=TStringstream.Create('',TEncoding.UTF8);
wpurl :='http://www.163.com';
IdHTTP1.Get(wpurl,RStream);
Memo1.Text := RStream.DataString;
wpurl := 'http://war.163.com'
IdHTTP1.Get(wpurl,RStream);
Memo2.Text := RStream.DataString;
end;为什么第2次的IdHTTP1.Get不成功? 怎样解决?谢谢.
Begin
RStream:=TStringstream.Create('',TEncoding.UTF8);
wpurl :='http://www.163.com';
IdHTTP1.Get(wpurl,RStream);
Memo1.Text := RStream.DataString;
wpurl := 'http://war.163.com'
IdHTTP1.Get(wpurl,RStream);
Memo2.Text := RStream.DataString;
end;为什么第2次的IdHTTP1.Get不成功? 怎样解决?谢谢.
不明白HTTP头补全...RStream:=TStringstream.Create('',TEncoding.UTF8); <---這句是抄你的. 呵呵!