有些时候我们用Webbrowser，在一些配置不好的机器上，访问网页会比较卡，特别是自动提交表单的时候。这时，如果一先一后访问两个网址或两个表单，而正好这时机器卡了一下。那这两个网址就变成一起传递给机器，这会造成系统文件M***.dll（具体文件名记不清了）出错而程序出错退出。想了好久，用了好多办法也没有解决这个问题，今天在写多线程程序的时候，突发奇想，用多线程访问网页怎么样呢？我就写了下面的例子，发现完美解决程序出错问题。有遇到这个问题的菜鸟拿去看看吧，高手就不要看了，见笑了。

var

  Form1: TForm1;

  Tid1, Tid2: DWord;

implementation

{$R *.dfm}

procedure Goto1();

begin

  WebBrowser1.Navigate('www.google.cn');

end;

procedure Goto2();

begin

  WebBrowser1.Navigate('www.baidu.com');

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

  BeginThread(nil, 0, @Goto1, nil, 0, Tid1);

  BeginThread(nil, 0, @Goto2, nil, 0, Tid2);

end;

end.

但是如果像下面这样写，十个机器有五六个会发生出错程序退出的状况：

procedure TForm1.Button1Click(Sender: TObject);

begin

  WebBrowser1.Navigate('www.google.cn');

  WebBrowser1.Navigate('www.baidu.com');

end;

来路http://www.lsworks.net/article/74.html