Question

我正在使用带有Delphi Xe2的gmlib 1.1，Os是XP sp3，Internet Explorer是版本8。我的问题是我不能在运行时以编程方式添加地面叠加层，而如果我在设计时这样做就可以了：在程序启动时加载并正确显示叠加层。具体来说，如果我在运行时添加任何图像，我会收到错误80020101。做一些调查，我偷看了源代码，我不得不修改TGMGroundOverlay。添加这样的功能，因为在分配属性（纬度，经度等）的同时更新叠加层时我似乎得到了错误：

function TGMGroundOverlay.Add(Url: string; SWLat, SWLng, NELat,
  NELng: Real): TGroundOverlay;
begin
  Result := TGroundOverlay(inherited Add);
  result.FVisible:=false;//<---added this line
  Result.Url := Url;
  Result.Bounds.SW.Lat := SWLat;
  Result.Bounds.SW.Lng := SWLng;
  Result.Bounds.NE.Lat := NELat;
  Result.Bounds.NE.Lng := NELng;
end;

然后我在添加后将叠加设置为活动状态。顺便说一句，我也得到了与gmlib mega-demo示例相同的错误。这种解决方法是必要的吗？添加新叠加层是我的错吗？

添加地面叠加层时出现错误80020101

0 个答案: