2005年5月11日
解析html网页及下载连接
摘要： 重要代码实现： procedure TForm1.MyWebBrswTitleChange(Sender: TObject; const Text: WideString); begin STitle := Text; end; function TForm1.ChangeURL(i,j: integer): Boolean; var Url : WideString; begi... 阅读全文
posted @ 2005-05-11 16:08 JustLive 阅读(1453) 评论(0) 推荐(0) 编辑