过Delphi实现打开程序后访问指定网站代码如下:
1、调用系统API(非知名网站杀毒软件报木马)
uses ShellApi, ... ... ;
ShellExeCute(Handle,nil,'http:\\',nil,nil,SW_Normal);
2、调用IE法(这个杀毒软件好像不报)
uses Comobj, ... ... ;
{...}
var
Form1: TForm1;
IEApp: Variant;
实现代码
beginIEApp := CreateOLEObject('InternetExplorer.Application');IEApp.visible := true;IEApp.Top := 0;IEApp.Left := 0;IEApp.width := screen.width; //可改你需要的宽度,此时为全屏IEApp.height := screen.height;//可改你需要的高度,此时为全屏IEApp.Navigate('');end;
如果觉得《delphi 打开指定网址》对你有帮助,请点赞、收藏,并留下你的观点哦!