www.map-info.ru :: Просмотр темы - Как построить линию зная нач. координаты, длину и азимут?
                               РќР° главную страницу сайта

 
                                
ВходВход    РегистрацияРегистрация    ПрофильПрофиль    ПользователиПользователи    ГруппыГруппы    FAQFAQ    ПоискПоиск  

 
   Список форумов www.map-info.ru | Форум - программирование в среде MapInfo Добавить ответ
Предыдущая тема :: Следующая тема  
Автор Сообщение
orcinus_orca



Зарегистрирован: 15.11.2011
Сообщения: 3
Откуда: Belarus

СообщениеДобавлено: Вт Ноя 15, 2011 9:34 am    Заголовок сообщения: Как построить линию зная нач. координаты, длину и азимут? Добавить ответ со ссылкой на данный текст

Здравствуйте,
Помогите, пожалуйста, в следующей проблеме.
Есть точка на карте и надо от нее построить линию (азимут и длина известны).
Можно конечно построить через "Create Line by Lengh", но это ручками, а линий надо настроить много.
Можно через функцию CreateLine, но как рассчитать конечные координаты?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
orcinus_orca



Зарегистрирован: 15.11.2011
Сообщения: 3
Откуда: Belarus

СообщениеДобавлено: Вт Ноя 15, 2011 3:41 pm    Заголовок сообщения: Добавить ответ со ссылкой на данный текст

Нашел )))
Не подскажите как теперь построить лепесток вместо линии?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
max7499



Зарегистрирован: 06.03.2012
Сообщения: 4
Откуда: RUS

СообщениеДобавлено: Вт Мар 06, 2012 1:44 pm    Заголовок сообщения: Добавить ответ со ссылкой на данный текст

у меня тотже вопрос. можешь подсказать как? Smile
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
orcinus_orca



Зарегистрирован: 15.11.2011
Сообщения: 3
Откуда: Belarus

СообщениеДобавлено: Вт Мар 06, 2012 2:44 pm    Заголовок сообщения: Добавить ответ со ссылкой на данный текст

Извини.
Нет времени писать.
Внизу можешь найти код. Надеюсь разберешся.
objcoord(1).x=Tempr.Latitude
objcoord(1).y=Tempr.Longitude
SID=Tempr.SiteID
SeID=Tempr.SectorID
Bnd=Tempr.Band
objcoord(10).x = objcoord(1).x
objcoord(10).y = objcoord(1).y
Dist1=Dist+0.1*Dist*cos((AntB/2)*DEG_2_RAD)
numnodes=10
obj_in=CreatePoint(objcoord(1).x, objcoord(1).y)
obj_st=Offset(obj_in, (-1)*azm+(AntB/2) +90, dist1, "m")
obj_end=Offset(obj_in, (-1)*azm-(AntB/2) +90, dist1, "m")
objcoord(2).x=centroidx(obj_st)
objcoord(2).y=centroidy(obj_st)
objcoord(9).x=centroidx(obj_end)
objcoord(9).y=centroidy(obj_end)
start=AntB/7

For i = 1 to 6
angle=(AntB/2)-start*i
dist2=Dist+0.1*Dist*cos(angle*DEG_2_RAD)
obj_temp=Offset(obj_in, (-1)*azm+angle +90, dist2, "m")
objcoord(i+2).x=centroidx(obj_temp)
objcoord(i+2).y=centroidy(obj_temp)
Next

Create Pline Into Variable myobj 0

For i = 1 to numnodes
Alter Object myobj Node Add (objcoord(i).x,objcoord(i).y)
Next
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
max7499



Зарегистрирован: 06.03.2012
Сообщения: 4
Откуда: RUS

СообщениеДобавлено: Вт Мар 06, 2012 4:05 pm    Заголовок сообщения: Добавить ответ со ссылкой на данный текст

спасибо большое Smile Привет от планеров Поволжья Very Happy
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
AlVer



Зарегистрирован: 15.03.2012
Сообщения: 1

СообщениеДобавлено: Чт Мар 15, 2012 9:05 am    Заголовок сообщения: Добавить ответ со ссылкой на данный текст

У вас в городах стрелки/линии друг на друга не накладываются?

моя ICQ: 460387094 - пишите, может сможем помочь друг другу.
Привет планерам из Сибири.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Andrey68927



Зарегистрирован: 11.05.2012
Сообщения: 1

СообщениеДобавлено: Пт Май 11, 2012 2:29 pm    Заголовок сообщения: Добавить ответ со ссылкой на данный текст

orcinus_orca писал(а):
Нашел )))
Не подскажите как теперь построить лепесток вместо линии?


Киньте ссылку пожалуйста, тоже надо очень.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
Показать сообщения:   
   Список форумов www.map-info.ru | Форум - программирование в среде MapInfo Добавить ответ
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Top.Mail.Ru