Преобразовать координаты из единиц карты в другие единицы измерения
procedure ConvertCoordFromMap(var x,y: double; aUnits: TMapUnits);
x
y
aUnits