如何用Delphi程序抓取一个网站下的所有网页
如何用Delphi程序抓取一个网站下的所有网页
日期：2017-01-15 21:13:04 人气：1
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, OleCtrls, SHDocVw;
type
TForm1 = class(TForm)
WebBrowser1: TWebBrowser;
Button1: TButton;
Edit1: TEdit;
ListBox1: TLis