本文整理自网络,侵删。
uses System.Win.ComObj;
procedure OpenInIE(url: string);var IE: OleVariant;begin // IE := CoInternetExplorer.Create; // IE.Visible := True; // IE.Navigate2(url); IE := CreateOleObject('InternetExplorer.Application'); IE.visible := True; IE.Navigate(url);end;
procedure TForm1.Button1Click(Sender: TObject);beginOpenInIE('http://www. .com/');end;
相关阅读 >>
Delphi 单击android上的web浏览器链接以启动Delphi应用程序
Delphi中组件label、edit、tag、memo、richedit
更多相关阅读请进入《Delphi》频道 >>