因为百度屏蔽了IDHttp,你把IDHttp的Request的UserAgent改一下,改成IE或者FireFox什么的都可以的. 比如:
idhttp1:=Tidhttp.create(nil);
idhttp1.HandleRedirects := True;
idhttp1.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.0) ';
url := 'http://news.baidu.com/ns?word=aaa&tn=news&from=news&cl=2&rn=20&ct=1';
mmo1.Lines.Add(idhttp1.Get(url));
IdHttp1.Disconnect;
IdHttp1.Free;