用API函数开不同的浏览器窗口

  • 主题发起人 主题发起人 import
  • 开始时间 开始时间
I

import

Unregistered / Unconfirmed
GUEST, unregistred user!
请问如何用WINDOWS API函数开不同的浏览器窗口?我用了SHELLEXECUTE函数,可是每次只 能开一个窗口,再执行时还是一个窗口。旧的内容都被新的内容覆盖了。怎样才能开新窗口?
1:ShellExecute(handle....) handle不一样即可;
2:
uses ComObj;
procedure TForm1.Button1Click(Sender: TObject);
procedure OpenInIE(aURL: string); //need uses ComObj;
var
IE : Variant;
begin
IE := CreateOleObject('InternetExplorer.Application');
IE.Visible := true;
IE.Navigate(aURL);
end;
begin
OpenInIE('www.delphibbs.com');
end;
最简单的方法:
ShellExecute(handle,'open','Explorer','Your www URL',nil,SW_SHOW);
即可。
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部