0

即使使用 MegaDemo 和 heapmap.csv,我们也看不到 TGMheatmap 是如何工作的。我们为 TGMheatmap 设置的属性与为 MageDemo 设置的属性相同(语言除外),我们在 FormCreate 中执行此操作:

procedure TForm1.FormCreate(Sender: TObject);
begin
  DefLat := 52.189746;
  DefLng := -2.215933;
  GMMap1.RequiredProp.Center.Lat := DefLat;
  GMMap1.RequiredProp.Center.Lng := DefLng;
  GMMap1.Active := True;
  GMHeatmap.LoadFromCSV(0, 1, 'C:\Temp\svhscusts.csv', ',', True, True);
end;

这在一个用于显示热图的按钮中

procedure TForm1.BHeatmapClick(Sender: TObject);
begin
  GMMap1.SetCenter(52.189746, -2.215933);
  GMMap1.RequiredProp.Zoom := 13;
  GMHeatmap.Show := not GMHeatmap.Show;
end;

数据文件的格式为(各占一行)

52.00240,-2.11490 52.00240,-2.11490 52.00200,-2.11400 52.00200,-2.11400 52.00400,-2.10950 52.00400,-2.10950 52.00400,-2.10950

由于 MegaDemo [似乎] 没有按预期工作,也许使用/更新 MegaDemo 将是解释什么不工作(或我们没有正确做)的最简单方法。

顺便说一句,优秀的软件。如果谷歌会降低它对小客户的许可费,我们可以正确使用它

4

0 回答 0