| |  Экспорт растра из *.GDB [ Илья ]Среда, 25 октября 2006, 15:56
Добрый день.
Наш заказчик передал нам исходные материалы (растр и вектор) в базе Objectland'а - файл.gdb.
Каким образом можно вытащить из этого файла растр, чтобы его можно было использовать в mapinfo или автокаде?
Спасибо. |
|
| | [ ObjectLand Support ] Среда, 25 октября 2006, 16:07
|
| | [ Максим Юрьевич Трухачёв ] Среда, 1 ноября 2006, 17:31
Илье:
Из всех способов предложенный выше - самый точный в том смысле, что он извлекает растр "один к одному", без искажений, точно таким, каким он был импортирован. Конечно, привязка теряется. Если нужно, напишите batmax(*)mail(*)ru, вышлю программку, которая растрирует МАКЕТЫ в файл BMP. Программка позволяет сохранить в BMP-формате также и векторные данные, и тексты, и легенды, и вообще всё, что может находиться в макете. Естественно, всё будет храниться вместе (и вектор, и растр) и в растрированном виде, но иногда именно так и нужно. Вы получите векторные данные, привязанные к растру, хотя для этого придётся создать макет. |
|
| | [ sergejheart ] Вторник, 7 ноября 2006, 09:40
программа для выгрузки растров из OL
(создаются bmp и tab файлы)
http://dvrkc.ru/pub/ol_rastr.rar
© М.Назаренко, ДВРКЦ, Хабаровск
(ответственности не несу =) ) |
|
| | [ Сергей ] Среда, 14 февраля 2007, 08:34
Выдергиваю кусок кода - ессно без проверок, инициализации и чистки (много лишних переменных, они в др. местах пользуются). имя растровых файлов
<имя_карты>-<имя_слоя>-<номер растра в слое>, ну и доп. - таб файл для привязки, для простоты - в план-схеме
Dim objGDBEngine As IGDBEngine
Dim objGDB As IGDBGeoDatabase
Dim objMaps As GDBMaps
Dim objMap As GDBMap
Dim objLayers As GDBLayers
Dim objLayer As GDBLayer
Dim objFeature As GDBFeature
Dim objFeatureType As GDBFeatureType
Dim objFeatureTypes As GDBFeatureTypes
Dim objFeatureset As GDBFeatureset
Dim i, j, k, l, aFeatureTypeCount, aLayersCount As Integer
Dim aFilePath As String 'путь экспорта
Dim GDB_NAME As String 'имя базы
Dim aGdbPath As String 'путь к базе
Dim aMapName As String
Dim anExportLayerName As String
Dim aMIFMapUnits As String
Dim aWindowCenterX, aWindowCenterY, aWindowWidth, aWindowHeight, aWindowAngle As Integer
Dim bmpstream As Object
Dim msg As String
Dim mapName As String
Dim fname As Variant
'......................................................................
'всякий вспоиогательный код, типа где базу взять, куда результат положить
'......................................................................
Set objGDBEngine = New GDBEngine
Set objGDB = objGDBEngine.OpenGDB(aGdbPath + GDB_NAME, gdbOpenExclusive Or gdbOpenReadWrite _
Or gdbOpenNoChgFile, "", "", "")
Set objMaps = objGDB.Maps
k = objMaps.Count
For Each objMap In objMaps
mapName = objMap.Name
Set objLayers = objMap.Layers
For Each objLayer In objLayers
Set objFeatureTypes = objLayer.FeatureTypes
For Each objFeatureType In objFeatureTypes
If objFeatureType.SpatialCategory = gdbSpatialCategoryImage Then
layName = objLayer.Name
Set objFeatureset = objLayer.OpenFeatureset
k = 0
objFeatureset.AbsolutePosition = 1
While Not objFeatureset.EOF
Set objFeature = objFeatureset.Feature()
If objFeature.FeatureType.SpatialCategory = gdbSpatialCategoryImage Then
k = k + 1
fname = mapName + "-" + layName + "-" + LTrim(Str(k))
objFeature.GetImage gdbImageFile, aFilePath + fname + ".bmp"
j = objFeature.ControlPointCount
Open aFilePath + fname + ".tab" For Output As #1
Print #1, "!Table"
Print #1, "!Version 300"
Print #1, "!Charset WindowsCyrillic"
Print #1, ""
Print #1, "Definition Table"
Print #1, " File """ + fname + ".bmp"""
Print #1, " Type ""Raster"""
For l = 1 To j
objFeature.GetControlPoint l, imagePointX, imagePointY, mapPointX, mapPointY
s = " (" + LTrim(Str(mapPointX)) + "," + LTrim(Str(mapPointY)) + _
") (" + LTrim(Str(imagePointX)) + "," + LTrim(Str(imagePointY)) + _
") Label ""Òî÷êà " + LTrim(Str(l)) + """"
If l < j Then
s = s + ","
End If
Print #1, s
Next
Print #1, " CoordSys NonEarth Units ""m"""
Print #1, " Units ""m"""
Close #1
End If
objFeatureset.MoveNext
Wend
End If
Next
Next
Next |
|
| | [ Сергей ] Среда, 14 февраля 2007, 08:36
| По предыдущему сообщению - извиняюсь, при копировании форматирование порезалось, потому читается с трудом |
|
| | [ serge heart ] Вторник, 27 мая 2008, 02:22
изменил на http://dvrkc.ru/pub/ol_rastr.zip
(немного исправил, сам активно пользуюсь =))
пс: интересно, еще кому-нибудь ента прога помогла...? |
|
| | [ serge heart ] Вторник, 27 мая 2008, 02:33
| на всякий случай оставил и http://dvrkc.ru/pub/ol_rastr.rar |
|
| | [ Andrew ] Вторник, 27 мая 2008, 12:38
доброго время суток!
вот скачал и решил попробывать но ни чего не вышло!выдает ошибку:
класс не зарегистрирован, class id: {....}
что не так может подскажите! |
|
| | [ ObjectLand Support ] Вторник, 27 мая 2008, 13:23
2 Andrew:
Возможно у Вас "типовая установка" ObjectLand (Она выполняется по умолчанию). Если так, то у Вас не установлен компонент "COM-интерфейсы ObjectLand". Для его установки войдите в системный диалог "Добавление и удаление программ", запустите изменение установки ObjectLand и добавьте этот компонент. |
|
| | [ Andrew ] Вторник, 27 мая 2008, 15:49
вроде получилось но не до конца!
возникла другая проблема при загрузке растра в мапинфо выдает ошибку:
встретилось {,} там где ожидается {)} |
|
| | [ ObjectLand Support ] Вторник, 27 мая 2008, 15:52
| Приведите содержимое tab-файла. |
|
| | [ Andrew ] Вторник, 27 мая 2008, 15:55
я нашел сам ответ на свой вопрос!спасибо!
и за программу тоже огромное спасибо! |
|
| | [ ObjectLand Support ] Вторник, 27 мая 2008, 16:25
"За программу спасибо" - это автору © М.Назаренко, ДВРКЦ, Хабаровск. А если проблема, на которую Вы нашли ответ, имеет значение для других пользователей - просьба опубликовать ее решение.
Могу предположить, что это связано с настройкой региональных настроек в Windows? |
|
| | [ Андрей ] Вторник, 2 сентября 2008, 14:13
Появилась та же ошибка: встретилось {,} там где ожидается {)}
текст tab файла:
!table
!version 300
!charset WindowsCyrillic
Definition Table
File "1.bmp"
Type "RASTER"
(3200419,39595222,6527322,02116088) (0,0) Label "Point 1",
(3200111,55969135,6522983,95973931) (0,1999) Label "Point 2",
(3202571,24252234,6522809,41643712) (1133,1999) Label "Point 3"
CoordSys NonEarth Units "m"
Units "m"
не подскажите как с ней справились? |
|
| | [ Objectland Support ] Вторник, 2 сентября 2008, 15:35
Попробуйте поменять в парах координат запятую на точку:
(3200419.39595222,6527322.02116088) (0,0) Label "Point 1",
(3200111.55969135,6522983.95973931) (0,1999) Label "Point 2",
(3202571.24252234,6522809.41643712) (1133,1999) Label "Point 3" |
|
| | [ serge heart ] Вторник, 30 сентября 2008, 02:34
| программа использует разделитель координат, установленный в винде. поменяйте в панеле управления-языки и стандарты, разделитель с запятой на точку. |
|
| | [ Алексей ] Четверг, 14 мая 2009, 18:39
| Пожалуйста, помогите очень нужно извлечь растр из *.GDB ссылка (http://dvrkc.ru/pub/ol_rastr.rar) на программу не работает, если у кого есть скиньте на мыло. |
|
| | [ Objectland Support ] Четверг, 14 мая 2009, 18:48
http://dvrkc.ru/pub/ol_rastr.zip
Ссылка исправлена. |
|
| | программка работает "через раз" [ Максим Юрьевич Трухачёв ] Вторник, 11 августа 2009, 20:49
| По ссылке http://files.mail.ru/BELSZX можно скачать ГБД, из которой растр извлечь невозможно, потому что программка не позволяет выбрать слой и тип геометрии (соответствующие списки пусты). Это далеко не единственный случай, программка работает "через раз". Я имею в виду программку М.Назаренко. |
|
| | [ ObjectLand Support ] Среда, 12 августа 2009, 17:47
| Автор опубликовал ее "как есть" без каких-то гарантий ее пригодности. Мы знаем, что многие ей пользуются. Поэтому мы от себя можем только поблагодарить ее автора. |
|
| | Экспорт растра из *.GDB [ serge heart ] Пятница, 14 августа 2009, 06:58
to Максим Юрьевич Трухачёв
Дело в том, что при выводе в комбобокс обрабатывались только 100 первых внутренних номеров (т.е. сто первых слоев, или 100 первых типов), если их больше (чего я даже не представлял) то упс =). поэтому если бы вы провели реорганизацию данной базы, то все бы заработало. НО это упущение исправлено и теперь обрабатываются 1000 первых внутренних номеров.
проверенно на вашей "С этой ГБД - не справляется.rar" - работает.
по ссылке заменил (перекачайте)
http://dvrkc.ru/pub/ol_rastr.zip |
|
| | [ Максим Юрьевич Трухачёв ] Пятница, 14 августа 2009, 18:17
to serge heart
спасибо за быстрое реагирование, обязательно скачаю исправленную версию. |
|
| | [ Максим Юрьевич Трухачёв ] Пятница, 14 августа 2009, 18:19
| P.S. пользуясь случаем, спасибо и за программку:) |
|
| | [ serge heart ] Понедельник, 17 августа 2009, 03:17
| п.с. единственное, что забыл уточнить: данные изменения внесены только в версию программы для ObjectLand 2.7, т.к. сам использую эту версию, и компиляция для 2.6 теперь представляет проблему |
|
| | [ serge heart ] Понедельник, 17 августа 2009, 06:42
отмена предидущего поста.
извернулся и скомпилировал и для OL 2.6 тоже |
|
| | [ Максим Юрьевич Трухачёв ] Понедельник, 17 августа 2009, 17:16
|
| | [ Арсен ] Вторник, 31 августа 2010, 14:02
Здраствуйте ссылка http://dvrkc.ru/pub/ol_rastr.rar не работает где можно взять эту программу
(программа для выгрузки растров из OL(создаются bmp и tab файлы)© М.Назаренко, ДВРКЦ, Хабаровск) |
|
| | [ serge heart ] Среда, 6 октября 2010, 07:03
сорри за долгое время ответа. не часто захожу на форум.
ссылка http://dvrkc.ru/pub/ol_rastr.zip |
|
| | [ Terminator ] Вторник, 26 октября 2010, 08:43
| Здравствуйте, ссылка на программу не работает, можете отправить на e-mail или подправить ссылку? Заранее огромнейшее спасибо! |
|
| | [ Иван ] Четверг, 2 декабря 2010, 13:30
| [ serge heart ] будте добры скиньте программу на эл.почту. ССылки не работают! Заранее спасибо! |
|
| | [ Максим Трухачёв ] Четверг, 2 декабря 2010, 17:42
|
| | ошибка с файлом привязки координат [ Алексей ] Четверг, 20 января 2011, 09:32
Здравствуйте... появилас вот такая вот ошибка
встретилась [)] там где ожидается [coordsys]
!table
!version 300
!charset WindowsCyrillic
Definition Table
File "M-37-46-В-г-4.bmp"
Type "RASTER"
(4193784.250,5607139.490) (0,122) Label "Point 1",
(4198199.050,5607093.890) (5213,2) Label "Point 2",
(4198153.150,5602458.790) (5340,5474) Label "Point 3"
(4193734.440,5602504.400) (124,5593) Label "Point 4"
CoordSys NonEarth
units "m"
буду очень благодарен если кто нибудь сможет помочь... |
|
| | Экспорт растра из *.GDB [ Objectland Support ] Четверг, 20 января 2011, 11:53
| После строки, заканчивающейся на Label "Point 3", наверное, должна идти запятая. |
|
| | [ Eli Guck ] Суббота, 26 ноября 2011, 12:43
| Здравствуйте,не могу выгрузить растр. во вкладке карта выбираю нужную и тут же ошибка out of memory. ему не хватает памяти в 4 гб? |
|
| | [ Petr27 ] Воскресенье, 27 ноября 2011, 13:29
| попробуйте увеличить максимальный размер используемой виртуальной памяти в диалоге "Настройка" Objectland на закладке "Память" |
|
| | [ ольга ] Понедельник, 5 марта 2012, 14:02
| Здравствуйте, не могу выгрузить растр даже после увеличения виртуальной памяти, та же ошибка out of memory. подскажите может уже появились и другие способы. |
|
| | [ Техподдержка ] Понедельник, 5 марта 2012, 15:10
| Попробуйте увеличить этот параметр до 1000Мб. |
|
| | [ ольга ] Понедельник, 5 марта 2012, 15:33
| Увеличила, та же проблема out of memory.Может еще чего попробовать или может я неправильно чего-то делаю, объясните пожалуйста для чайника по подробнее. |
|
| | [ Техподдержка ] Понедельник, 5 марта 2012, 16:56
К сожалению, затрудняемся помочь, это программа одного из пользователей.
Может еще стоит проверить ГБД на целостность, меню "ГБД+Проверка целостности".
Если же Вам нужен растр без геопривязки, то его можно выгрузить просто сохранением из редактора растрового объекта. |
|
| | ошибка с файлом привязки координат [ Виталий ] Воскресенье, 26 января 2014, 16:45
вот такая ошибка: встретилась [)] там где ожидается [coordsys]
вот мой tab
!table
!version 300
!charset WindowsCyrillic
Definition Table
File "Донецк.jpg"
Type "RASTER"
(37.71091461, 48.06595277) (0, 0) Label "Point 1",
(37.92411804, 47.93692074) (621, 560) Label "Point 2",
(37.71091461, 47.93692074) (0, 560) Label "Point 3",
(37.92411804, 48.06595277) (621, 0) Label "Point 4",
(37.81768799, 48.00147734) (310, 280) Label "Point 5",
(37.81768799, 48.06595277) (310, 0) Label "Point 6",
(37.71091461, 48.00147734) (0, 280) Label "Point 7",
(37.92411804, 48.00147734) (621, 280) Label "Point 8",
(37.81768799, 47.93692074) (310, 560) Label "Point 9",
CoordSys Earth Projection 1, 104
Units "degree" |
|
| | Экспорт растра из *.GDB [ Objectland Support ] Понедельник, 27 января 2014, 13:35
Мы создали tab-файл с приведеным Вами содержимым и он успешно импортировался в ГИС ObjectLand без каких-либо ошибок. Где именно выдается такое сообщение об ошибке - в файле отчета об импорте растра или в отдельном окне с сообщением в процессе импорта? Какую версию ГИС ObjectLand Вы используете? |
|
| | [ Александр ] Понедельник, 24 ноября 2014, 19:31
| В мап инфо экспортируется к верх ногами все. Как бороться ? |
|
| | [ Аслан Хамуков ] Вторник, 29 августа 2017, 09:23
| Спасибо автору программы. Очень выручила. |
|
| | [ Аслан Хамуков ] Четверг, 26 октября 2017, 17:21
Добрый день.
Нужна помощь.
Программа выдает ошибку interface not supported.
В чем может дело? База из которой хочу выгрузить растр, раньше выгружалась нормально.
А теперь ошибка.
Может дело в Операционной системе? У меня Windows 10. |
|
| | [ Максим Юрьевич Трухачёв ] Пятница, 3 ноября 2017, 21:50
Аслан, возможно, ObjectLand на машине под Win 10 был установлен по варианту "Типовая установка".
Попробуйте, пожалуйста, переустановить в варианте "Полная установка", и напишите, исчезла ли ошибка "interface not supported". |
|
| | [ Максим Юрьевич Трухачёв ] Среда, 7 августа 2019, 03:13
|
| | [ Аслан ] Вторник, 18 апреля 2023, 11:00
Добрый день.
Есть живая ссылка на программу http://dvrkc.ru/pub/ol_rastr.zip.
Указанная ссылка мертвая, а файл очень нужен. |
|
| | [ ObjectLand Support ] Вторник, 18 апреля 2023, 14:26
|
| | [ Аслан Хамуков ] Вторник, 18 апреля 2023, 15:21
|
ОтветитьЗнаком «*» отмечены обязательные для заполнения поля. |
