Аналитика

Цифровая фотограмметрия, картография и землеустройство
Текущее время: 28 фев 2024 05:25

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




Начать новую тему Ответить на тему  [ Сообщений: 211 ]  На страницу Пред.  1 ... 9, 10, 11, 12, 13, 14, 15  След.
Автор Сообщение
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 10 май 2018 12:58 
Эксперт
Эксперт

Зарегистрирован:
11 сен 2012 09:11
Сообщения: 78
Dmitry_Zolotar писал(а):
Виталий писал(а):
Подскажите пожалуйста. Как В шаблоне TemplateName.dot добавить обработчик. Спасибо

Откройте редактор Visual Basic (в главном меню Word или Ribbon-интерфейсе выбрать Сервис-Макрос-Редактор Visual Basic)
В окне редактора выберите свой шаблон, затем в выпадающем списке Document, редактор сгенерирует заготовку обработчика события.
Вложение:
2018-05-08 11.40.46.png


Спасибо


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 05 июн 2018 15:18 
Специалист
Специалист

Зарегистрирован:
04 май 2011 13:47
Сообщения: 35
Доброго дня! Можливо хтось знає як зробити експорт картинки з ДІГІ у формат PNG? Подаю 6-зем онлайн, а там зробили вимоги до формату. Раніше користувався скриптом, але тепер він не проходить, хоча в скрипті розширення ставлю PNG. допоможіть.


Вложения:
6-зем-Схема_Проект.dmt [107.01 Кб]
Скачиваний: 964
Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 05 июн 2018 16:48 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 2293
Откуда: Vinnytsia
sirenko_s_a писал(а):
Доброго дня! Можливо хтось знає як зробити експорт картинки з ДІГІ у формат PNG? Подаю 6-зем онлайн, а там зробили вимоги до формату. Раніше користувався скриптом, але тепер він не проходить, хоча в скрипті розширення ставлю PNG. допоможіть.

Є така утиліта BMP2PNG.exe, можна скористатись нею. В наступному прикладі ця утиліта розташована у Digitals\Utils
Код:
$FN=@Map.ClearFilename
$PP=@ProgramPath
@Map.SaveToTIF 300 24 $FN.bmp
@Run $PP\Utils\bmp2png.exe $FN.bmp
@Wait 3000
@Run del $FN.bmp
@Wait 3000
@Run del $FN.bmpw
@Wait 3000
@Run $FN.png


P.S. Можливо додамо до @Map.SaveToTIF підтримку PNG

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


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 06 июн 2018 09:28 
Специалист
Специалист

Зарегистрирован:
04 май 2011 13:47
Сообщения: 35
Dmitry_Zolotar писал(а):
P.S. Можливо додамо до @Map.SaveToTIF підтримку PNG

ОГРОМЄЗНОЄ Дякую!!!!


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 25 июл 2018 15:24 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
Скрипт для отримання даних про полiгон (простий, складний чи збiрний). Для використання скопiюйте бiблiотеку PointInPoly.dsf в папку Library (в папцi Digitals)
Код:
$Obj=@Map.SelectedObject
$Poly=@Map.GetObjectCoordinates $Obj
@Text.Text=$Poly
@Text.Delete 1-3
$Count=@Text.Count
$I=1
$S=
%Cycle
$Line=@Text.Line[$I]
@If ("$Line"="") Then @Goto %Complex
$X=@StringPart 2 $Line
$Y=@StringPart 3 $Line
$Z=@StringPart 4 $Line
$XYZ=$X $Y $Z
@If $S= Then $S=$XYZ Else $S=$S $XYZ
$I=$I+1
@If $I<=$Count Then @Goto %Cycle
@Dialog.Message Простий полiгон
@Goto %End
%Complex
$Line=@Text.Line[$I]
@If ("$Line"="") Then @Goto %SkipLine
$X=@StringPart 2 $Line
$Y=@StringPart 3 $Line
$Z=@StringPart 4 $Line
;
$Param=$X $Y $Z $Poly
$Res=%Library.PointInPoly $Param
@If $Res=0 Then @Goto %Composite 
;
%SkipLine
$I=$I+1
@If $I<=$Count Then @Goto %Complex
@Dialog.Message Складний полiгон
@Goto %End
%Composite
@Dialog.Message Збiрний полiгон
;
%End

Ф-цiя PointInPoly повертає значення 0-3, положення точки вiдносно полiгону (0-точка за межами полiгону, 1-точка в межах полiгону, 2-координати точок спiвпадають, 3-точка лежить на контурi полiгону).
Параметрами ф-цiї є: координати точки (X Y Z) та данi змiнної, отриманої за допомогою ф-цiї @Map.GetObjectCoordinates.


Також додав данi функцiї в бiблiотеку GeoGed (для тих, хто користується)


Вложения:
Комментарий к файлу: Виправлено визначення положення точки, що лежить на осi Y
PointInPoly.zip [1.17 Кб]
Скачиваний: 459

_________________
Більшість хороших програмістів виконують свою роботу не тому, що очікують оплати або визнання, а тому, що отримують задоволення від програмування.


Последний раз редактировалось Руслан Пархуць 05 авг 2018 18:32, всего редактировалось 1 раз.
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 31 июл 2018 12:31 
Специалист
Специалист

Зарегистрирован:
04 май 2011 13:47
Сообщения: 35
Dmitry_Zolotar писал(а):
sirenko_s_a писал(а):
Доброго дня! Можливо хтось знає як зробити експорт картинки з ДІГІ у формат PNG? Подаю 6-зем онлайн, а там зробили вимоги до формату. Раніше користувався скриптом, але тепер він не проходить, хоча в скрипті розширення ставлю PNG. допоможіть.

Є така утиліта BMP2PNG.exe, можна скористатись нею. В наступному прикладі ця утиліта розташована у Digitals\Utils
Код:
$FN=@Map.ClearFilename
$PP=@ProgramPath
@Map.SaveToTIF 300 24 $FN.bmp
@Run $PP\Utils\bmp2png.exe $FN.bmp
@Wait 3000
@Run del $FN.bmp
@Wait 3000
@Run del $FN.bmpw
@Wait 3000
@Run $FN.png


P.S. Можливо додамо до @Map.SaveToTIF підтримку PNG


Як прописати, щоб файл PNG зберігало в папці якій міститься файл???


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 31 июл 2018 13:32 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 2293
Откуда: Vinnytsia
sirenko_s_a писал(а):
Dmitry_Zolotar писал(а):
P.S. Можливо додамо до @Map.SaveToTIF підтримку PNG

Як прописати, щоб файл PNG зберігало в папці якій міститься файл???

$FN=@Map.ClearFilename
@Map.SaveToTIF 300 24 $FN.png

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


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 09 янв 2019 16:26 
Эксперт
Эксперт

Зарегистрирован:
16 фев 2017 21:10
Сообщения: 72
подскажите пожалуйста каким образом можно установить в программе по умолчанию, создавался XML-файл а не normal???


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 10 янв 2019 12:12 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
Vladimirart08 писал(а):
подскажите пожалуйста каким образом можно установить в программе по умолчанию, создавался XML-файл а не normal???

Замiнiть файл Normal.dmf в папцi з програмою на XMLNormal.dmf з папки Templates (попереднiй збережiть про всяк випадок).

_________________
Більшість хороших програмістів виконують свою роботу не тому, що очікують оплати або визнання, а тому, що отримують задоволення від програмування.


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 10 янв 2019 20:18 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 795
Откуда: Львівська область
Руслан Пархуць писал(а):
Замiнiть файл Normal.dmf в папцi з програмою на XMLNormal.dmf з папки Templates (попереднiй збережiть про всяк випадок).

А якщо потім треба буде відкрити чи створити ІН4?
Не дуже добре міняти ці файли. Тоді програма стає обмеженою по функціоналу.

_________________
додатково про скрипти Digitals на www.digitals.at.ua


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 11 янв 2019 13:49 
Эксперт
Эксперт

Зарегистрирован:
16 фев 2017 21:10
Сообщения: 72
Возможно ли в диджитале подгружать или создавать свои штриховки, если можна то каким образом??!


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 11 янв 2019 14:18 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 795
Откуда: Львівська область
Vladimirart08 писал(а):
Возможно ли в диджитале подгружать или создавать свои штриховки, если можна то каким образом??!


так, щоб створити свою шриховку, можна використовувати Symbol Manager, який запускається через меню програми Digitals - Карта - Умовні знаки

_________________
додатково про скрипти Digitals на www.digitals.at.ua


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 16 янв 2019 12:53 
Эксперт
Эксперт

Зарегистрирован:
16 фев 2017 21:10
Сообщения: 72
Подскажите пожалуйста каким образом можна изменить в диджитале, чтобы добавлялись теги с слешем (/) а именно в адресах, так как если прописка город то дают отказ в регистрации пишут валидность електронного документа без проротакола. Или они не знают что этих тегов не надо???


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 17 янв 2019 09:42 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 2293
Откуда: Vinnytsia
Vladimirart08 писал(а):
Подскажите пожалуйста каким образом можна изменить в диджитале, чтобы добавлялись теги с слешем (/) а именно в адресах, так как если прописка город то дают отказ в регистрации пишут валидность електронного документа без проротакола. Или они не знают что этих тегов не надо???

Для того чтобы в XML-файл внести текст, содержащий символы разметки, необходимо этот текст внести в секцию CDATA
<Building>13/а</Building> - не валидный XML
<Building><![CDATA[13/а]]></Building> - валидный XML
Но НКС не воспринимала и такую форму записи, как минимум ранее. Так ли это сейчас? Никто не мешает проверить.

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


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Библиотека полезных скриптов
СообщениеДобавлено: 22 янв 2019 16:08 
Эксперт
Эксперт

Зарегистрирован:
16 фев 2017 21:10
Сообщения: 72
Dmitry_Zolotar писал(а):
Vladimirart08 писал(а):
Подскажите пожалуйста каким образом можна изменить в диджитале, чтобы добавлялись теги с слешем (/) а именно в адресах, так как если прописка город то дают отказ в регистрации пишут валидность електронного документа без проротакола. Или они не знают что этих тегов не надо???

Для того чтобы в XML-файл внести текст, содержащий символы разметки, необходимо этот текст внести в секцию CDATA
<Building>13/а</Building> - не валидный XML
<Building><![CDATA[13/а]]></Building> - валидный XML
Но НКС не воспринимала и такую форму записи, как минимум ранее. Так ли это сейчас? Никто не мешает проверить.


Мається на увазі
Такий Вигляд, можливо таким чином зробити
<Country>804</Country>
<Region/>
<District/>
<Settlement>Київ</Settlement>
<Street>проспект Іванова</Street>
<Building>18</Building>
<BuildingUnit>225</BuildingUnit>
ДЯКУЮ.


Вернуться к началу
 Профиль Отправить email  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 211 ]  На страницу Пред.  1 ... 9, 10, 11, 12, 13, 14, 15  След.

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


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

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


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

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