摘要: 调用下面这个函数,可以获取http://www.iciba.com/网站的英语每日一句.原理很简单, 先获取整个页面的信息, 由于是UTF-8字符, 所以需要转化一下.然后通过查找关键字,将所要的句子截取出来.//获取爱词霸每日一句 {uses IdHTTP}function TFrmTip.GetDayEnglish(): string;var reStr, str_1: string; idhtp1: TIdHTTP;begin Result := ''; try idhtp1 := TIdHTTP.Create(nil); reStr := idhtp1.Get(' 阅读全文
posted @ 2010-12-14 21:21 小阿枫 阅读(402) 评论(0) 推荐(0) 编辑