Аналитика

Цифровая фотограмметрия, картография и землеустройство
Текущее время: 22 ноя 2017 13:08

Часовой пояс: UTC + 2 часа




Начать новую тему Ответить на тему  [ Сообщений: 1118 ]  На страницу Пред.  1 ... 34, 35, 36, 37, 38, 39, 40 ... 75  След.
Автор Сообщение
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 26 фев 2012 15:00 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 603
Откуда: Ліспроект
1. Що-до команди @Map.SetProperties Scale Name|FrameX[1] FrameY[1]|...
В скрипті: якщо розмах рамки, встановленої командою @ExecuteMenu MapFrameSelected білше 100*100мм при масштабі карти 1:10000 то, для того щоб в подальшому скрипт експортував фрагмент в звіт з розміром масштабованої картинки 10х10см і селектовані об'єкти помістились, команда @Map.SetProperties Scale Name|FrameX[1] FrameY[1]|... встановлює перед експортом координати кутів рамки до розмаху рамки 100*100мм при масштабі карти 1:25000.
Команда не дозволяє встановити/відмінити опцію Зберегти розмір підписів. На замовчування ця опція виключена, отже розмір підписів робить фрагмент практично "нечитаємим".
Будь-ласка, чи можна доповнити функцію @Map.SetProperties Scale Name|FrameX[1] FrameY[1]|..., стосовно Зберегти розмір підписів :?: Або, як вийти з ситуації :?:
Ставив би свій Ged.ini, але не знайшов опцію, яка по логіці відповідала б Зберегти розмір підписів.
Шукав у групі, що містить:
[FrameForm.cbxScales]
ItemIndex=1
Text=1 : 10 000

2. Як на мене, було б добре мати функцію, що повертала б статус будь-якої опції з меню Digitals: @OptionStatus Option
- наприклад вигляд - чорновий/звичайний/повний @OptionsStatus View = ViewDraft (значиться чорновий), або ViewPageLayout (значить повний), або...
- наприклад Збір|Автозахоплення - Вкл./Викл. @OptionsStatus CollectAutoSnap = 0 (значиться викл), або 1 (значиться вкл.)


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 08 мар 2012 17:38 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 603
Откуда: Ліспроект
Шановні розробники.
Є пункти меню Правка|Вибрати|Суміжні, Усі суміжні, Прилеглі, але вибірка стосується відносно об'єкта, а не окремо взятої точки об'єкта.
Пропоную додати функцію @Map.Object[N].Point[N].NodePoints, яка б повертала список: номер об'єкта, точка якого лежить у цьому вузлі та, відповідно, номер точки об'єкта, що лежить у цьому вузлі.
Підкажіть будь-ласка, невже єдиний шлях вирішення цієї задачі у скрипті - скористатись наведеними пунктами меню, а потім порівнювати координати точок позначених об'єктів перебором:?:


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 17 мар 2012 10:07 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 603
Откуда: Ліспроект
Є ще одна пропозиція: додати функцію @Map.PasteText [Options] [Layer], що вставляла б об'єкт з буфера обміну Windows як текст. Параметри Options, могли б не міняючи налаштування в Сервіс|Налаштування|Правка|Вставка об'єкта як текст вказати опції вставки, а параметр Layer містив би перелік ID шарів вставки. Якщо параметри функції відсутні - вставка відбуватиметься з опціями, що у фреймі Вставка об'єкта як текст. Пов'язана тема


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 20 мар 2012 19:09 
Эксперт
Эксперт

Зарегистрирован:
30 авг 2010 16:23
Сообщения: 99
Откуда: Хмельницкий
Нужна функция для перевода даты из формата 20.03.2012 в формат 2012-03-20, или подскажите пожалуйста как правильно использовать символ - , что-то не получается его обуздать ))
Есть ли возможность в скрипте узнать текущую дату ?


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 02:03 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 1865
Откуда: Vinnitsa
Deffar писал(а):
Нужна функция для перевода даты из формата 20.03.2012 в формат 2012-03-20, или подскажите пожалуйста как правильно использовать символ - , что-то не получается его обуздать ))
Есть ли возможность в скрипте узнать текущую дату ?

$Date=@Calc Now
$Year=@Calc Copy($Date,1,4)
$Year=@DequoteText $Year
$Month=@Calc Copy($Date,6,2)
$Month=@DequoteText $Month
$Day=@Calc Copy($Date,9,2)
$Day=@DequoteText $Day
@Dialog.Message $Year-$Month-$Day

_________________
Команда разработчиков Digitals
(наш e-mail и ICQ находятся в меню Помощь|О программе)
Новичкам сюда | Новые возможности программы | Купить Digitals


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 09:31 
Эксперт
Эксперт

Зарегистрирован:
30 авг 2010 16:23
Сообщения: 99
Откуда: Хмельницкий
Спасибо !!
@Dialog.Message $Year-$Month-$Day - вот так то оно конечно работает, а как присвоить это значение в переменную ?


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 10:44 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 1865
Откуда: Vinnitsa
Deffar писал(а):
Спасибо !!
@Dialog.Message $Year-$Month-$Day - вот так то оно конечно работает, а как присвоить это значение в переменную ?

$Date=$Year-$Month-$Day

_________________
Команда разработчиков Digitals
(наш e-mail и ICQ находятся в меню Помощь|О программе)
Новичкам сюда | Новые возможности программы | Купить Digitals


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 11:26 
Эксперт
Эксперт

Зарегистрирован:
30 авг 2010 16:23
Сообщения: 99
Откуда: Хмельницкий
Dmitry_Zolotar писал(а):
$Date=$Year-$Month-$Day

Решение конечно очевидное, но в результате мы получаем арифметическое выражение, или я что - то недопонимаю ?


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 11:29 
Гуру
Гуру

Зарегистрирован:
26 фев 2007 12:04
Сообщения: 1751
Откуда: Vinnitsa
Нет, это не арифметическое выражение а просто склейка строки из частей. Частями являются переменные $Year, $Month, $Day и символ "-".

_________________
Команда разработчиков Digitals
(наш e-mail и ICQ находятся в меню Помощь|О программе)
Новичкам сюда | Новые возможности программы | Купить Digitals


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 11:48 
Эксперт
Эксперт

Зарегистрирован:
30 авг 2010 16:23
Сообщения: 99
Откуда: Хмельницкий
Код:
$Date=@Calc Now
$Year=@Calc Copy($Date,1,4)
$Year=@DequoteText $Year
$Month=@Calc Copy($Date,6,2)
$Month=@DequoteText $Month
$Day=@Calc Copy($Date,9,2)
$Day=@DequoteText $Day
$Date=$Year-$Month-$Day
@Dialog.Message $Date

Скрипт выдает значение 1988 - никакой склейки :(


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 12:29 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 1865
Откуда: Vinnitsa
$Date=@Calc Now
$Year=@Calc Copy($Date,1,4)
$Year=@DequoteText $Year
$Month=@Calc Copy($Date,6,2)
$Month=@DequoteText $Month
$Day=@Calc Copy($Date,9,2)
$Day=@DequoteText $Day
$Date=$Year-$Month-$Day-
$Date=@Calc Copy("$Date",1,10)
$Date=@DequoteText $Date
@Dialog.Message $Date

_________________
Команда разработчиков Digitals
(наш e-mail и ICQ находятся в меню Помощь|О программе)
Новичкам сюда | Новые возможности программы | Купить Digitals


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 12:43 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 603
Откуда: Ліспроект
Попробуйте так: змінна $Text міститиме те що треба
Код:
$Date=@Calc Now
$Date=@DequoteText $Date
$Date=@Calc Replace("$Date","/","-",1)
$Year=@StringPart 1-$Date
$Month=@StringPart 2-$Date
$Day=@StringPart 3-$Date
$Text=@StringPart 1 $Date
$Text=@DequoteText $Text
@Dialog.Message $Text


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 21 мар 2012 16:25 
Эксперт
Эксперт

Зарегистрирован:
30 авг 2010 16:23
Сообщения: 99
Откуда: Хмельницкий
Відразу два рішення, дякую !! Все працює !


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 22 мар 2012 12:51 
Эксперт
Эксперт

Зарегистрирован:
01 фев 2008 12:00
Сообщения: 56
есть ЦМР. надо построить крутизну уклонов. делаю ЦМР/фильтровать ЦМР/преобразовать в уклоны. затем горизонтали из ЦМР/TIN. получаем некие контура, области с разным уклоном.
вопрос, как узнать какой уклон в градусах для каждой области?


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 23 мар 2012 08:10 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 603
Откуда: Ліспроект
Яка Ваша думка що-до: @Map.SetProperties Scale Name|FrameX[1] FrameY[1]|... з опцією Зберегти розмір підписів якщо масштаб мінятиметься; @Map.Object[N].Point[N].NodePoints; @Map.PasteText [Options] [Layer], що вставляла б об'єкт з буфера обміну Windows як текст :?:


Вернуться к началу
 Профиль Отправить email  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 1118 ]  На страницу Пред.  1 ... 34, 35, 36, 37, 38, 39, 40 ... 75  След.

Часовой пояс: UTC + 2 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: Google [Bot] и гости: 8


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB