Информационная система обработки геодезических измерений в кадастре

Программный продукт GeoGenius «не умеет» импортировать данные из своих проектов в какие-либо другие программы, единственная возможность для импорта, заключается в том, что GeoGenius формирует отчет о своей работе в формате .html. Для импорта, необходимо открыть файл отчета в программе Internet Explorer(*.html- формат именно этой программы), после этого, необходимо выделить таблицу  с точками, которые мы хотим передать в MapInfo, скопировать эту таблицу в буфер обмена Windows. Запустить MS Excel, вставить данные из буфера обмена начиная с ячейки R1C1. После всех описанных действий, необходимо запустить MapInfo и в ней запустить программу MapBasic, исходный текст для которой приведен ниже. Основная часть программы, это модуль установления DDE связи с MS Excel, в котором DDE запросы к MS Excel выполняются до тех пор, пока ячейка первого столбца на станет равна 0 или “”(пусто)

 

Declare Sub Main

Sub Main                                       

Dim chan_num, tab_marker As Integer

Dim topiclist, topicname, cell As String

 

chan_num = DDEInitiate("EXCEL", "System")       ‘

If chan_num = 0 Then                            ‘

  Note "Excel is not responding."               ‘

  End Program                                   ‘Устано-

End If                                          ‘вление

                                                ‘DDE

topiclist = DDERequest$(chan_num, "topics")     ‘связи

                                                ‘с

If Left$(topiclist, 1) = ":" Then               ‘MS Excel  

  tab_marker = InStr(3, topiclist, Chr$(9) )    ‘

  If  tab_marker = 0  Then                      ‘

    Note "No Excel documents in use! Stopping." ‘

    End Program                                 ‘

  End If                                        ‘

  topicname = Mid$(topiclist, 3, tab_marker - 3)‘

Else                                            ‘ 

  tab_marker = Instr(1, topiclist, Chr$(9) )    ‘

  topicname = Left$( topiclist, tab_marker - 1) ‘

                                                ‘

End If                                          ‘

                                                ‘

DDETerminate  chan_num                          ‘

chan_num = DDEInitiate("Excel", topicname)      ‘

If chan_num = 0 Then                            ‘

  Note "Problem communicating with " + topicname‘

  End Program                                   ‘

End If                                          ‘

 

Create Table Points               ‘создание таблицы

(num Integer                      ‘в которой будут

x_coord Float                     ‘храниться

y_coord Float)                    ‘импортированные

File "C:\points.tab"              ‘данные

Type Native                       ‘

 

i=1

while k=true

num_cell1 ="R"+Str$(i)+"C"+"1"    ‘присвоение номеров

num_cell2 ="R"+Str$(i)+"C"+"2"    ‘ячеек, к которым будут

num_cell3 ="R"+Str$(i)+"C"+"3"    ‘осуществляться запросы

 

cell1 = DDERequest$( chan_num, num_cell1 ) ‘DDE запросы

cell2 = DDERequest$( chan_num, num_cell2 ) ‘

cell3 = DDERequest$( chan_num, num_cell3 ) ‘

 

If cell1 <> Chr$(13) + Chr$(10) Then

k=true

  i=i+1

  Insert Into Points         ‘заполнение таблицы

  Values (cell1,cell2,cell3) ‘полученными значениями

else

k=false

DDETerminateAll  

end if

wend

 

End Sub

 

 

 

 

 

ГЛАВА 4.ПРОЛОЖЕНИЕ ОПОРНЫХ ТЕОДОЛИТНЫХ ХОДОВ,   НАКОПЛЕНИЕ ДАННЫХ В ПОЛЯХ БАЗ ДАННЫХ, ОБРАБОТКА ИЗМЕРЕНИЙ В GIS MAPINFO.

В MapInfo имеются два типа таблиц. Обычные таблицы (таблицы данных), большинство таблиц MapInfo относится к этому типу. Этот тип подразделяется, в свою очередь, на таблицы с графическими объектами (объектами на карте) и без таковых (электронные таблицы и внешние базы данных).

Второй тип таблиц - это растровые таблицы, то есть изображения, которые можно показывать в окнах Карт. Эти компьютерные изображения не имеют записей, полей и индексов. Вся информация ниже относится в обычным таблицам (таблицам данных).

4.1 Создание новых таблиц

Чтобы создать новую таблицу в MapInfo;

1. Выполните команду файл > новая таблица. Появится диалог "Новая таблица".

2. Установите флажок "Показать  Списком", чтобы создаваемая таблица  была показана в окне списка  в традиционной табличной форме.

3. Нажмите ОК. Появится диалог "Показать  структуру таблицы".

4. Нажмите кнопку Добавить поле, чтобы начать создание структуры базы данных. Задайте имя поля, его тип и размер, а также укажите, нужно ли индексировать это поле.

5. Описав все поля, нажмите ОК. MapInfo создаст новую таблицу.

6. Задайте имя таблицы  и нажмите кнопку Создать.

Наличие индекса убыстряет процесс поиска и объединения. Чтобы выполнить команду найти для некоторого поля, это поле следует сначала проиндексировать. Индексировать можно несколько полей сразу.

Изменить порядок полей можно с помощью кнопок Вверх и Вниз. Помните, что в том порядке, в каком поля расположены в данном диалоге (сверху вниз), в таком же (слева направо) они будут показываться в окне Списка.

Вносить изменения в структуру таблиц можно непосредственно во время работы в MapInfo. Можно добавлять и удалять поля, изменять их порядок и названия, тип, размер и признак индексирования любого поля. Кроме того, можно задать или изменить проекцию, используемую таблицей. Также Вы можете регулировать наличие графических объектов в таблице (соответственно и возможность показа ее в окне Карты).

Чтобы просмотреть или изменить структуру таблицы:

1. Выполните команду таблица > изменить> структура Появится диалог структуры таблицы.

2. Внесите необходимые изменения  или просто просмотрите структуру  таблицы, листая информацию о  полях.

Помните, что для таблиц, созданных на основе внешних баз данных структуру можно только просматривать.

4.1.2 Сохранение таблицы и ее копии

Чтобы сохранить изменения, внесенные в данные или графические объекты некоторой таблицы должны сохранить эту таблицу. Для этого выполните команду файл > сохранить таблицу Появится диалог, в котором следует указать, какую таблицу сохранить.

Можно сохранить копию таблицы под другим именем с помощью команды создать копию. По сути дела, при этом создается новая таблица. Эту команду удобно использовать:

• Когда Вы хотите сохранить внесенные изменения, не удаляя при этом исходный вариант

таблицы.

• Когда надо сохранить результат запроса. (Таблицы запросов являются временными и при необходимости дальнейшего использования их следует сохранять на диск) .

• Когда надо сохранить таблицу, содержащую временную колонку (после обновления колонки).

• Когда Вы создаете новую таблицу перед внесением изменений в исходную таблицу.

• Когда необходимо из MapInfo внести изменения во внешнюю базу данных.

• Когда надо сохранить таблицу в другой проекции.

• Когда Вы хотите сохранить таблицу в формате, совместимом с MapInfo версии 2.

 Чтобы сохранить копию таблицы:

1. Выполните команду файл > создать копию. Появится диалог "Сохранить копию таблицы".

2. Выберите файл, который следует сохранить, и нажмите ОК.

3. Задайте новое имя файла.

Исходная таблица останется открытой, без каких-либо изменений. Новая таблица не будет открыть автоматически, но ее можно открыть с помощью команды открыть.

4.1.3 Копирование и переименование таблиц

Поскольку таблицы MapInfo состоят из нескольких файлов (STATES.TAB, STATES.DAT, STATES.MAP и т.д.), все файлы-компоненты определенной таблицы должны быть расположены в одном каталоге. Чтобы перенести таблицу в другой каталог, следует перенести все файлы, относящиеся к данной таблице. Аналогично, все файлы следует переносить при сохранении таблиц на дискете.

Поскольку любая таблица состоит не менее чем из двух файлов, нельзя переименовать только один из них. Иначе MapInfo не будет знать, где следует искать остальные файлы-компоненты. Поэтому лучше не пользоваться командами DOS для переименования файлов-

Для переименования таблицы:

1. Выполните команду таблица> изменить> переименовать Появится диалог

"Переименовать таблицу".

2. Выберите таблицу, которую следует переименовать, и нажмите ОК.

3. Задайте новое имя и нажмите  ОК.

При подобном переименовании таблицы Maplnfo изменяет имена всех файлов-компонент.

Помните, что переименование таблицы повлияет на все Рабочие Наборы, в которых она упоминается. После переименования таблицы следует отредактировать файлы Рабочих Наборов (WOR) в текстовом редакторе, проставив новое имя таблицы. Можно также переименовать таблицу перед сохранением Рабочего Набора.

4.1.4 Добавление записей в таблицу

Команда таблица> добавить строки в ТАБЛИЦУ используется для добавления в таблицу записей из другой таблицы. Эти две таблицы должны иметь одинаковые колонки, расположенные в одиншовом порядке.

Чтобы добавить данные из другой таблицы;

1- Выполните команду таблица> добавить СТРОКИ В таблицу Появится одноименный диалог.

2. Укажите название таблицы, записи  из которой Вы будете добавлять.

3. Укажите, к какой таблице следует  добавлять записи, и нажмите ОК.

Если соответствующие колонки содержат данные разного вида, выполняется наилучшее возможное преобразование типов. Если не совпадает порядок колонок, измените его с помощью колонок

таблица> изменить> структура прежде, чем выполнять команду добавить строки в таблицу.

4.1.5 Удаление таблицы

Удаление таблицы влечет удаление ТАВ-файла и всех других файлов-компонент. Чтобы удалить таблицу:

1- Выполните команду таблица> изменить> удалить.

2. Укажите, какую таблицу следует  удалить, и нажмите ОК.

3. Появится сообщение о том, что  таблица будет удалена с диска, причем отменить это действие будет невозможно.

4. Нажмите OK, и MapInfo удалит таблицу

Упаковка таблицы                                     

Операция упаковки таблицы позволяет сжать табличные файлы и тем самым сэкономить место на диске. Можно упаковывать либо только числовые данные, либо только графические объекты, либо и то, и другое. При упаковке числовых данных таблица очищается от удаленных записей.

Для того, чтобы упаковать таблицу, Maplnfo требует наличия свободного места на диске, равного двойному размеру обрабатываемого файла (для хранения резервной копии сжимаемого файла).

Чтобы упаковать таблицу:

1- Выполните команду таблица> изменить> упаковать Появится диалог "Упаковать".

2. Укажите, какую таблицу Вы хотите  упаковать, и каким именно способом (числовые и(или) Графические данные).

3. Нажмите ОК.

Внимание: Упаковка может повредить подписи, сохраняемые в Рабочем наборе. Если Вы планируете работать с подписями, то упакуйте таблицу до создания подписей.

Чтобы обновить колонку:

1. Выполните команду Таблица > Обновить колонку.

2. В появившемся диалоговом окне  заполните окошки: Обновить таблицу - окошко содержит список всех открытых таблиц, выберите нужную;    Обновить колонку - определите колонку для обновления; в окошке Значение извлечь из   установите,   на основании данных какой таблицы будет обновлена колонка. Отметьте, что если Вы выберите таблицу отличную от таблицы, выбранной в окошке Обновить таблицу, то в окошке Обновить колонку появится Добавить новую временную колонку. Это значит, что в таблице появится новая временная колонка, в которую будут помещены новые данные. Чтобы впоследствии сохранить эту временную колонку, сохраните копию таблицы (Файл > Сохранить копию).

3. Далее, если у Вас в окошках  Обновить таблицу и Значение  извлечь из выбраны разные  таблицы, Вы их можете объединить, или (также если одна) составить выражение, которое определит новые данные.

4. Для отображения результата  в окне Список установите флажок  в окошке Результат в список  и нажмите ОК.

 

4.2 Работа с тахеометром-полуавтоматом  “Geodimeter 510”

Электронный тахеометр-полуавтомат "Geodimeter 510" предназначен для определения горизонтальных и вертикальных углов, а также измерения расстояний. Благодаря наличию запоминающего устройства, прибор не требует ручного ведения полевого журнала измерений.