Delphi TGMMap被拒绝访问

Delphi TGMMap被拒绝访问,delphi,Delphi,我使用的是gmlibv1.5.0,在使用GMMap组件时似乎出现了一个奇怪的错误 为了解决此错误,我在Delphi XE7中创建了一个小项目,设置如下: TForm、TWebBrowser、TButton和TGMMap。TGMMap设置为使用TWebBrowser作为其浏览器。应用程序通过代理服务器访问web。在TButton click事件中,我添加了以下代码: procedure TForm6.Button3Click(Sender: TObject); begin GMMap1.Act

我使用的是gmlibv1.5.0,在使用GMMap组件时似乎出现了一个奇怪的错误

为了解决此错误,我在Delphi XE7中创建了一个小项目,设置如下: TForm、TWebBrowser、TButton和TGMMap。TGMMap设置为使用TWebBrowser作为其浏览器。应用程序通过代理服务器访问web。在TButton click事件中,我添加了以下代码:

procedure TForm6.Button3Click(Sender: TObject);

begin

GMMap1.Active := True;

GMMap1.RequiredProp.Zoom := 3;

end;
procedure TForm6.GMMap1AfterPageLoaded(Sender: TObject; First: Boolean);

begin

if First then

GMMap1.DoMap;

end;
在TGMMap AfterPageLoaded事件中,我有以下代码:

procedure TForm6.Button3Click(Sender: TObject);

begin

GMMap1.Active := True;

GMMap1.RequiredProp.Zoom := 3;

end;
procedure TForm6.GMMap1AfterPageLoaded(Sender: TObject; First: Boolean);

begin

if First then

GMMap1.DoMap;

end;
该应用程序适用于我们网络上从windows xp到windows 8的所有其他计算机,只有一台除外。在运行windows 8的特定计算机上,每当我单击按钮执行GMMap1时。Active:=True;代码我得到一个拒绝访问错误,没有进一步的错误,谷歌地图也不会显示在TWebBrowser组件中。我也禁用了任何抗病毒药物,但仍然没有运气。如果我执行以下代码WebBrowser1.Navigate(“”);使用TWebBrowser,应用程序运行良好—似乎只有在使用TGMMap组件时才如此


这台电脑可能是问题所在,但需要确认。还有其他人犯过这个错误吗?GMMap试图访问哪些被系统拒绝的内容?

开始->控制面板->网络,互联网->互联网选项->单击卡安全并降低安全级别(互联网,中高)。 祝你好运