网页你都获取了,读标签对你来说没有任何难度,只是稍微细心点就可以了~假设你的网页在字符串html里面,i,j,k是整数,那么下面的语句输出所有你要的内容:i:=pos('[td]',html);//寻找开始位置while i>=1 do//找到就循环begindelete(html,1,i+17);//删除找到的标签以及之前的内容i:=pos('[/td]',html);//寻找结束标志if i<=0 then break;//找不到就退出writeln(copy(html,1,i-1));//CONSOL方式输出需要的标签,这只是例子,你的程序里面这样输出会报错i:=pos('<t... |