Jump to content

Google Map New Component

Recommended Posts

  • 2 years later...
  • 2 weeks later...

in procedure


Procedure TUniGoogleMap.SetHTML ;
Var AjaxUrl, AjaxParam : String ;
  If Not (csDesigning in ComponentState) And WebMode And Not SameText(FMapName, 'GoogleMap_Name') Then
    AjaxParam := 'isEvent=1&Obj='+ Self.ExtPanel.JSName + '&evt=maploaded' + '&_S_ID='+ UniApplication.UniSession.SessionID ;
    HTML.Text := '<div id="' + FMapName + 'Tag" style="width:100%; height:100%"></div><script>'+FMapName+' = new GoogleMapObject("' + FMapName + 'Tag",' + FloatToStr(FDefaultMapLat, LocalFS)+','+ FloatToStr(FDefaultMapLng, LocalFS) + ',' + IntToStr(FDefaultMapZoom) + ',' +  QuotedStr( AjaxParam ) + ') ;</script>' ;

can not find Self.ExtPanel.JSName


Link to comment
Share on other sites

  • 2 years later...

Hi all


I Developed UniGoogleMap component for uniGUI.


Last Version 1.4.2 ( For Delphi XE - XE2)

Last Update 2011-12-07


important: must be install veriosn uniGUI ver or later.


This component is a subclass of TUniHTMLFrame.

So i write a Objective Class for using GoogleMap API (files\GMap.js).

I used Google Map API V3.0

This Class uses a third party Class (markerwithlabel.js).


Attention: when you put this component on the form first set MapName property. If you want use multiple Map on your project, must be set unique name for this property.


After Install this component add in [uniGUI Additional] section of uniGUI components.


I add many future as soon as.


Many Thanks to Mr. Farshad for this usefull framework.





Best Regards

Babak Yaghoobi





How Install in Delphi Berlin ?

Please Help me 


Link to comment
Share on other sites

  • 10 months later...
  • 5 months later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • Create New...