TMapMtq.SetMtqProjectionDataTMapMtq |
Установить данные о проекции матрицы
function SetMtqProjectionData(var MapReg : TMapRegisterEx) : integer;
Описание: Метод позволяет установить данные о проекции матрицы из заполненной структуры MapReg, при ошибке возвращает ноль.
TMAPREGISTEREX = packed record Length : cardinal; // Размер данной структуры Name : TSmallString; // Имя района Scale, // Знаменатель масштаба ProjectionFlag, // Флаг соответствия проекции EllipsoideKind, // Вид эллипсоида HeightSystem // Система высот MaterialProjection, // Проекция исх. материала CoordinateSystem, // Система координат PlaneUnit, // Единица измерения в плане HeightUnit, // Единица измерения по высоте FrameKind, // Вид рамки MapType, // Обобщенный тип карты DeviceCapability, // Разрешающая способность прибора // Обычно равна 20 000 // Для карт повышенной точности: // -1 - максимальная точность // -2 - хранить координаты в сантиметрах // -3 - хранить координаты в миллиметрах DataProjection, // Наличие данных о проекции OrderViewSheetFlag, // Порядок отображения листов FlagRealPlace, // Признак реальных координат ZoneNumber : cardinal; // Заполняется системой при запросе // формуляра - номер зоны топокарты в радианах FirstMainParallel, // Первая главная параллель SecondMainParallel, // Вторая главная параллель AxisMeridian, // Осевой меридиан MainPointParallel, // Параллель главной точки PoleLatitude, // Широта полюса проекции PoleLongitude : double; // Долгота полюса проекции Reserv2 : array[0..7] of byte; end;
|