delphi 如何实现采集一个网页
delphi 如何实现采集一个网页
求一个采集的例子
看了几个源码 其中几个地方不明白
豆丁网
function TForm1.GetStr(StrSource,StrBegin,StrEnd:string):string;
var
in_star,in_end:integer;
begin
in_star:=AnsiPos(strbegin,strsource)+length(strbegin);
in_end:=AnsiPos(strend,strsource);
result:=copy(strsource,in_sta,in_end-in_star);
end;
in_sta,in_end-in_star 都没定义 他是怎么用的
s:=copy(re,pos(' <td width="100" align="left">',re)+29,99999);
/// +29意思就是前规律的字符数（可以用我提供的软件查） 99999是规律中的截取数据字符。
s:=copy(s,1,pos(' </td>',s)-1);
s:=stringreplace(s,' ',' ',[rfReplaceAll]);
Label1.Caption:='综合排名:'+s; /// s 就是我们截取到的内容
cpoy
后面加的 2999999是什么意思
求 详解的delphi采集 代码
部分问题已解决 还有一个
s:=copy(re,pos(' <td width="100" align="left">',re)+29,99999);
copy的 函数 copy 长度怎么计算 在网页中
问题已解决 来人领分
如需要阅读该回复，请登录或注册CSDN!
相关问答：
已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......
delphi如何向Access数据表中自定义字段?然后显示到DBGrid中
怎么没人理我呀
分分忒少咧，一般人都懒得进来……*^_^*
SQL
creat table TableName(ID Counter Primary Key,FieldName varchar(20))
ADOQue ......
由于客戶端有的文件經常更新（遠程的，不是局域網），
所以想寫個自動更新的 程序。
看網上的 方法資料，知道些方法，但不知道具體怎么寫。
......
Delphi
怎样获取网页部分内容（代码），并且显示出来！
（只是网页里面的一部分内容并不是全部）
没弄懂！
类似websever的功能？
估计是利用ie的接口。。。。。。。。
是类似websever的功能 ......
昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
XY : string;
begin
XY := comboboxxy.Items[comboboxx ......
