TMS iCL DEVELOPERS GUIDE - TMS Software

TMS SOFTWARE
TMS iCL
DEVELOPERS GUIDE
This code will return the correct coordinate of the center of the map, regardless of where the map
is positioned. Clicking the button drops an annotation on the MapView:
If you pan the Map, and click the button, the pin will be dropped in the center of the MapView
again, but on a different coordinate. The XYToCoordinate functionality is using the current region,
and zooming level of the MapView to return the correct coordinate.
Pin vs View
By default, the annotation that is added on the map displays a pin, but this can also be changed per
annotation. On the annotation collection item, a Bitmap property is available to customize the
default view of an annotation. The sample below shows how to add a custom image for an
annotation.
var
loc: TTMSFMXNativeMKMapLocation;
ann: TTMSFMXNativeMKAnnotation;
begin
loc := TMSFMXNativeMKMapView1.XYToCoordinate(TMSFMXNativeMKMapView1.Width
/ 2, TMSFMXNativeMKMapView1.Height / 2);
ann := TMSFMXNativeMKMapView1.AddAnnotation(loc, 'Hello World',
'Subtitle');
ann.Bitmap.LoadFromFile(ExtractFilePath(ParamStr(0))+'pin.png');
70