Проверил вызов функций. Все работает. Вот пример на VB. AxaxMapAtlas1.OpenAtlas("c:\Program Files\Borland\Delphi6\GisToolFree11_8_5\Example\Data\demo.als") Dim dp As axGisToolKit.TxDoublePoint Dim imess As String dp.X = 0.96870398 dp.Y = 0.65579102
If AxaxMapAtlas1.ExistsMapInPoint(100000, dp, 0) = True Then imess = "Есть карта!" MsgBox(imess, MsgBoxStyle.Information, "") End If
Dim ai As axGisToolKit.TxAtlasItem If AxaxMapAtlas1.get_ItemByNumber(1, ai) <> 0 Then imess = ai.Name MsgBox(imess, MsgBoxStyle.Information, "") End If
Проверил вызов функций. Все работает. Вот пример на VB.
Здравствуйте, Роман!
Я очень рад что на VB работает. Меня к сожалению интересует связка ActiveX - MSVC - C++ для этого и был приложен проект с кодом. Спасибо за проверку но ошибка похоже не в моем коде а обертке которую создает студия из ActiveX
Сергей, а какой тип данных возвращает конструкция strSystemPath+L"GIS\\altlas.atl" в VisualStudio 2008? --- В этой оболочке работал кажется ещё в Виннице, но если мне не подводит память результатом будет объект типа IDispatch а не строка, и тем более не набор байт-текста
П.С. кстате, при отладке примеров под АктивХ, самая большая проблема была строки в С++. (я удивляюсь как заядлые Сишники попривыкали к отсутствию строк)
Роман Твердов пишет: Ваш проект так и не удалось собрать. Собрали свой проект в VS2008 на C++. Никаких проблем. Можем выслать его.
Конечно выслать, и контакт кому задавать вопросы которые скорее всего появятся.
PS: А что именно не удалось? У Вас в личной почте был полный алгоритм сборки на каком этапе "не удалось"? Я боюсь что сейчас не смогу собрать Ваш проект, но посмотрим конечно.