Отображение карты в разных единицах измерения

Question

Как задавать единицы измерения карты например метры при использовании контрола

Answer 1

Попробуй так
procedure SetGeoCoordSys(const Value: GeographicCoordSysConstants);
var GCS  : IMoGeoCoordSys; // проекция в градусах
begin
        GCS  := IMoGeoCoordSys(CreateOleObject('MapObjects2.GeoCoordSys'));
        GCS.Type_:=Value;
        Map1.CoordinateSystem:=GCS;
        Map1.Refresh;
end;
//////////////////////////////////////////
procedure SetProjCoordSys(const Value: ProjectedCoordSysConstants);
var PCS  : IMoProjCoordSys; // проекция в метрах
begin
        PCS  := IMoProjCoordSys(CreateOleObject('MapObjects2.ProjCoordSys'));
        PCS.Type_:=Value;
        Map1.CoordinateSystem:=PCS;
        Map1.Refresh;
end;