0

我收到此错误“由于错误 80020101 无法完成操作。” 随机显示带有标记的地图时。我使用 Delphi 2007 和 GMLib [1.2.0 Final]。

我已经阅读了这个问题,一些建议是问题是由于 javascript 代码中的注释或语法错误造成的,建议我删除所有注释并检查 javascript 代码中的错误。我这样做了,我在修改 map.html 文件后重新编译并重新安装了 GMLib。我删除了它的所有评论并通过 ie 解析了它的错误,但没有发现任何错误,正如预期的那样。但问题仍然存在。这是我的代码示例,用于显示地图并添加标记:

Var
  newmarker : TMarker;
begin
  newmarker :=  GMMarker1.Add();
  newmarker.Position.Lat := MarkersToPaint[i].Latitude;
  newmarker.Position.Lng := MarkersToPaint[i].Longitude;
  newmarker.Visible := True;
  newmarker.Title := MarkersToPaint[i].Title;

  GMMap1.RequiredProp.Center.Lat := midlat;
  GMMap1.RequiredProp.Center.Lng := midlong;
  GMMap1.RequiredProp.Zoom := 18;

  GMMarker1.ShowElements;

  GMMap1.Active := True;

在这件事上的任何帮助将不胜感激。

4

1 回答 1

0

我找到了问题代码部分,我用标记的新位置更新了地图,并努力保持标记始终可见,我在计时器上调用以下代码:

GMMap1.RequiredProp.Center.Lat := MarkersToPaint[i].Latitude; --problem code
GMMap1.RequiredProp.Center.Lng := MarkersToPaint[i].Longitude; --problem code
GMMap1.PanTo(MarkersToPaint[i].Latitude,MarkersToPaint[i].Longitude);

删除问题代码后,错误停止了。我不确定是什么原因导致它们,但对于在这些情况下遇到此错误的任何人来说,这是一种解决方法。

谢谢您的帮助。

于 2013-11-12T09:54:32.480 回答