Картометрические операции в Arc. GIS 9

Картометрические операции в Arc. GIS 9 - измерение длин - измерение площадей - измерение периметров

Для примера использованы слои карты ПТК полуострова Курголовский Ленинградской области, полученные путем векторизации растра топографической основы масштаба 1: 50 000 • -гидрографическая сеть (shp – линии) • -Polygons (shp – полигоны) Система координат: Pulkovo_1942_GK_ Zone_5

Редактирование семантической информации слоя • 1) создадим документ карты. mxd «пустой картой» • 2) добавим слои линейных и площадных объектов, которые хотим редактировать: • гидрографическая сеть (shp – линии) • Polygons (shp – полигоны) • (если Вы работаете с общественным источником информации во избежании порчи следует сделать копию слоев в свою папку, используя Arc. Catalog) • 3) проверим данные о картографической проекции: свойства слояисточник данных. В описании проекции указаны линейные единицы (метрыградусымили и т. д. ) Если требуется изменить линейные единицы (например градусы в метры), то следует преобразовать проекцию (географические системы координат в предопределенные).

• Преобразование проекций можно выполнить: • - используя Arc. ToolboxУправление данными (Data Management Tools)проекции и преобразованияпространственный объектпроецировать; • - данныеэкспорт данныхиспользовать систему координат фрейма (предварительно задав фрейму данных нужную Вам проекцию) • Когда линейные единицы системы координат слоя Вас устраивают (в нашем примере это метры в прекции Гаусса-Крюгера 5 зона) можно приступить к картометрическим операциям.

Расчет длин линейных объектов 1) Откроем таблицу атрибутов слоя линейных объектов 2) Добавим поле dlina, разрядность – общее число знаков

3) Щелкните правой кнопкой мыши на заголовок нового поля, выберите «калькулятор поля» (всплывет предупреждение, предлагающее перейти в режим редактирования, выберете на свое усмотрение);

4) Щелкните галочку в окошке «дополнительно» , открывается окно «код скрипта VBA» , скопируйте данную последовательность знаков и вставьте в окно • Dim dbl. Length as double • Dim p. Curve as ICurve • Set p. Curve = [shape] • dbl. Length = p. Curve. Length Ниже окно «название поля» = (в нашем случае «dlina» =) Вставить в него: dbl. Length; Тип: число Слой: выделить название слоя dlina Нажать кнопку ОК Вы получили значения длин для каждого линейного объекта в слое, смотрите таблицу атрибутов.

Второй вариант. 1) Откроем таблицу атрибутов слоя линейных объектов 2) Добавим поле dlina, разрядность – общее число знаков 3) Щелкните правой кнопкой мыши на заголовок нового поля, выберите «вычислить геометрию» (всплывет предупреждение, предлагающее перейти в режим редактирования, выберете на свое усмотрение); 4) Выберите систему координат (фрейма данных или слоя), а так же единицы измерения в которых Вы хотите получить расчет длин. Нажмите ОК Представляется, что в версии Arc. GIS 9, удобнее пользоваться уже созданным инструментом «Вычислить геометрию» , нежели писать скрипт VBA. Однако опробовав первый вариант, становиться понятным механизм создания таких удобных инструментов, как «Вычислить геометрию» .

Расчет площадей и периметров Думается расчет этих параметров Читатель сможет провести самостоятельно по шаблону рассчета длин. Скрипт VBA для расчета площадей: • Dim dbl. Area as double • Dim p. Area as IArea • Set p. Area = [shape] • dbl. Area = p. Area. area Скрипт VBA для рассчета периметров: • Dim dbl. Perimeter as double • Dim p. Curve as ICurve • Set p. Curve = [shape] • dbl. Perimeter = p. Curve. Length

Вычислить геометрию Свойсто: Area либо Perimetr Система координат: фрейма либо слоя Единицы измерения: какие пожелаете из списка

Спасибо за внимание