初学dll webbrowser 遇到问题，请大牛帮忙？

[linchun888]

library testdll;
uses
SysUtils,
Classes,
Unit1 in 'Unit1.pas' {Form2};
{$R *.res}
begin
Form2 := TForm2.Create(Nil);
try
Form2.ShowModal;
finally
Form2.Free;
end;
end.
——————————————————————————————————————
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, SHDocVw,activex;
type
TForm2 = class(TForm)
WebBrowser1: TWebBrowser;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form2: TForm2;

implementation

{$R *.dfm}
procedure TForm2.FormCreate(Sender: TObject);
begin
webbrowser1.Navigate('http://www.baidu.com');
//以上一句出错
end;

Initialization
CoInitialize(Nil);
Finalization
CoUnInitialize;
end.

————————————————————
问题1
在exe中一个button下调用！
loadlibrary('testdll.dll');
这句就出错 webbrowser1.Navigate('http://www.baidu.com');
问题2
如何判断webbrowser中的网页下载完毕？（带frame的网页）
我想做成，
webbrowser1.Navigate('http://www.1.com');//完毕后
webbrowser1.Navigate('http://www.2.com');//这2个网页都是带多个frame的

请大牛指教下！十分感谢！

[starluck]

webbrowser1.Navigate('http://www.1.com');//完毕后 

while WebBrowser1.ReadyState<>4 do
    Application.ProcessMessages;
webbrowser1.Navigate('http://www.2.com');//这2个网页都是带多个frame的 

[linchun888]

楼上的这个我试过， WebBrowser1.ReadyState 和webbrowser1.busy 这2个都是针对 不带框架的网页！

[linchun888]

我用IDHTTP已经实现！ 不知道为什么WEBBROWSER 在DLL中出错？