gmmap bileşeni

[erdogan_ozkaya]

Arkadaşlar aşağıdaki kod ile bir noktadan diğer noktaya yol tarifi alıyorum fakat bu başka bir component.

aynı işlemi "GMMap " bileşeni ile yapmak istiyorum bilgisi olan varmı acaba ?

not: iki componenti aynı anda kullanıcı inc dosyaları çakışıyor ve bir sürü hata veriyor

Kod: Tümünü seç

procedure TYOL_TARIFI_PENCERE.Button1Click(Sender: TObject);
var
  DirectionsRequest: TDirectionsRequest;
begin
  with Script do
  begin
    DirectionsRequest:=TDirectionsRequest.Create;          //DirectionsRequest-Objekt anlegen
    DirectionsRequest.OriginAsString:=Edit1.Text;          //Start der Route
    DirectionsRequest.DestinationAsString:=Edit2.Text;     //Ende der Route
    DirectionsRequest.TravelMode:=Google.Maps.DirectionsTravelMode.Driving; //Reiseart
    if DirectionsServices.Count=0                          //noch kein DirectionsServices-Objekt vorhanden
      then Google.Maps.DirectionsService;                  //-> neu anlegen
    DirectionsServices[0].Route(DirectionsRequest,DirectionsCallback);
  end;
end;