GMLib簡單的指示樣品

Question

有人可以給我一個簡單的示例我怎麼能使用GMLib落實後續情況： 我有一些地址（街道，號碼，城市）EI想使用連接所有的谷歌地圖，使路線他們。 我正在使用Delphi XE2。 非常感謝！

Answer 1

你需要一個TWebBrowser，一個TGMMap和TGMDirection和連接組件，以便：

TGMDirection.Map - > TGMMap TGMMap.WebBrowser - > TWebBrowser

活動TGMMap（活動：= TRUE）和在AfterPageLoaded事件把這個代碼：

procedure TMainFrm.GMMap1AfterPageLoaded(Sender: TObject; First: Boolean); 
begin 
    if First then GMMap1.DoMap; 
end; 

現在，你只需要與始發地和目的地地址配置TGMDirection並調用Execute方法：

// minimum config 
TGMDirection.DirectionsRequest.Origin.Address := 'Origin address'; 
TGMDirection.DirectionsRequest.Destination.Address := 'Destination address'; 
TGMDirection.Execute; 

你需要知道，所有調用Execute方法創建一個新的項目進入的DirectionsResult陣列。此數組具有計數項目（基於0）。此外，您需要知道每個結果都可以返回（如果Status = dsOK），則將1個或多個結果存儲到Routes數組（也基於0）。

TGMDirection.DirectionsResult -> array with all request 
TGMDirection.DirectionsResult[X].Routes -> array with all results of a request if Status = dsOK 

問候