在论坛看到各人对那个问题讨论良多,就是一句话阐明的事,但我似乎生成点背,那个问题不断纠缠着我:不断搞不清:
我的要求是,动态创建多个webbrowser并展现。因为我用的是delphi2007,创建VCL forms application,挈一个button,间接写代码:
procedure TForm1.Button1Click(Sender: TObject);
var myweb:Twebbrowser;
begin
myweb:=Twebbrowser.create(self);
myweb.parentwindow:=self.Handle;
myweb.SetBounds(button1.Left,button1.Top+button1.Height+10,30,30);
myweb.Show;
end;
编译间接报错:[DCC Error] Unit1.pas(27): E2003 Undeclared identifier: ’Twebbrowser’,郁闷!不成能啊,后来挈进往一个Twebbrowser才气运行胜利;不大白。
因为是动态创建,我想实现每点击下button1就创建一个webbrowser窗口。于是在implementation前定义:var myweb:array[0..4] of Twebbrowser; n:integer=0;代码如下:
procedure TForm1.Button1Click(Sender: TObject);
begin
myweb[n]:=Twebbrowser.create(form1);
myweb[n].parentwindow:=self.Handle;
myweb[n].Top:=button1.Top+button1.Height+10;
myweb[n].SetBounds(button1.Left+10*n,button1.Top+button1.Height+10,30,30);
myweb[n].Show;
myweb[n].Navigate(’’);
inc(n);
end;
可是如许一个webbrowser窗口都展现不了。仍是不大白;尝试了半天都不大白怎么回事?跪求高手赐教!!!