Аналитика

Цифровая фотограмметрия, картография и землеустройство
Текущее время: 29 мар 2024 15:30

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




Начать новую тему Ответить на тему  [ Сообщений: 1369 ]  На страницу Пред.  1 ... 82, 83, 84, 85, 86, 87, 88 ... 92  След.
Автор Сообщение
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 08 июн 2020 14:49 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 823
Откуда: Ліспроект Володимир Вовчанський
Доброго дня.

Трохи не вистачає скриптової функції @Map.Layer.CollectionTemplate Number [Index], яка повертала б шаблон збору, призначений для шару з номером (або ID) Number та при наявності індекса шаблону Index ще й встановлювала/змінювала його. Якщо можна додати - було би добре.


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

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Бачу, розробники Digitals уже успішно просунулися в отриманні атрибутів з сайту https://ngo.land.gov.ua/. А складно додати скриптову функцію, яка б читала звідти коди грунтів?

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 15 июн 2020 17:15 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 2298
Откуда: Vinnytsia
voha писал(а):
Доброго дня.

Трохи не вистачає скриптової функції @Map.Layer.CollectionTemplate Number [Index], яка повертала б шаблон збору, призначений для шару з номером (або ID) Number та при наявності індекса шаблону Index ще й встановлювала/змінювала його. Якщо можна додати - було би добре.


Додано функцію
@Map.Layers.CollectionTemplate Number [Index]
яка встановлює/повертає Index шаблону сбору шару Number.

Index співпадає з номером шаблону у відповідному випадаючому списку менеджера шарів.
0 - очищення
1 - Polyline
2 - Polygon
3 - Rectangle
4 - Orthogonal
5 - Point
6 - Line
7 - Circle
8 - Parallel
9 - Stairs
10 - Passage
11 - Threelinear
12 - Middle Point
13 - Start Point

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


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

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Dmitry_Zolotar писал(а):
fendak писал(а):
Але проблема в тому, що Digitals, коли форму власності стерти, після збереження XML постійно повертає в параметр форми власності 100 Приватна власність.

Це відбувається у випадку наявності файла Digitals\Templates\XML.csv та наявності у цьому файлі строки "7000512 100 Приватна власність".


Добрий день! А чому ви не оновите файл Digitals\Templates\XML.csv у всіх користувачів, видаливши звідки строку 7000512 100 Приватна власність
Або взагалі зробіть випадаючий список з порожнім рядком
Изображение

Щоб користувачі могли зразу вибрати варіант - не вказувати форму власності.
Ця проблема виникає в багатьох. Бо інакше дають таке зауваження:
Изображение

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 16 июн 2020 12:30 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
05 апр 2008 03:14
Сообщения: 202
Откуда: Тернополь
Підкажіть будь-ласка, як в дмт шаблон вставити точки/межові знаки в кожну поворотну точку ділянки з вказаною нумерацією. Дякую.
Вірніше щоб вони там з'являлись.


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 22 июн 2020 19:14 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Дуже не вистачає скриптової функції, яка могла б встановлювати висоту рядків та ширину колонок в таблицях.
Якби така була - це дало б величезні можливості для формування різних експлікацій.
Тоді можна було б в скрипті прописати, щоб вони автоматично змінювалися залежно від довжини тексту в ячейках (чи висоти таблиці).


Вложения:
2020-06-22_201153.png
2020-06-22_201153.png [ 2.55 Кб | Просмотров: 7180 ]

_________________
додатково про скрипти Digitals на www.digitals.at.ua
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 23 июн 2020 11:10 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
fendak писал(а):
Дуже не вистачає скриптової функції, яка могла б встановлювати висоту рядків та ширину колонок в таблицях.
Якби така була - це дало б величезні можливості для формування різних експлікацій.
Тоді можна було б в скрипті прописати, щоб вони автоматично змінювалися залежно від довжини тексту в ячейках (чи висоти таблиці).

@Map.GetObjectParamBuf
@Map.SetObjectParamBuf

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 23 июн 2020 12:05 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Руслан Пархуць писал(а):
@Map.GetObjectParamBuf
@Map.SetObjectParamBuf

Дякую!

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 23 июн 2020 12:57 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
fendak писал(а):
Руслан Пархуць писал(а):
@Map.GetObjectParamBuf
@Map.SetObjectParamBuf

Дякую!

:) для прикладу, бо колись теж це довго шукав
Код:
$NewHeight=12000
;
$c10=@Calc char(10)
$c13=@Calc char(13)
$c10=@DequoteText $c10
$c13=@DequoteText $c13
;
$Obj=@Map.NextSelected
$Buf=@Map.GetObjectParamBuf $Obj
@Text[1].Clear
@Text[1].Text=$Buf
;
$Count=@Text[1].Count
$I=1
$Result=
@While $I<=$Count %LoopText
$Line=@Text[1].Line[$I]
$Name=@StringPart 1 $Line
@If ($I=2) And ("$Name"<>"ROWHEIGHT") Then $Result=@Concat $Result,$c10,ROWHEIGHT $NewHeight
@If ("$Name"="ROWHEIGHT") Then $Line=ROWHEIGHT $NewHeight
@If $Result= Then $Result=$Line Else $Result=@Concat $Result,$c10,$Line
$I=$I+1
%LoopText
@Map.SetObjectParamBuf $Obj$c13$c10$Result
$Table=@Map.Object[$Obj].TableText
@Map.Object[$Obj].TableText=$Table
;@Map.RefreshObject $Obj
@ExecuteMenu ViewRefresh

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 23 июн 2020 21:06 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Руслан Пархуць писал(а):
:) для прикладу, бо колись теж це довго шукав

Ну та, з цими символами ASCII зразу би не зрозумів, що до чого. Не так просто це все зібрати до купи після внесення змін. Дякую, Руслан. Справді завдяки Вам зекономив багато часу.

До речі, експерементуючи з ASCII (все ж таки було цікаво чому саме char(10) та char(13)), я вирішив іншу задачу.
Вона полягала в тому, що в таблицях не можливо було поставити знак табуляції на початках абзацу, бо знак Tab (char(9)) тут є чомусь роздільником колонок в таблиці.
Тому на початку абзаців замість знаку табуляції завжди ставив декілька пробілів під ряд. І все б добре, але при такому способі не можливо було вирівняти текст по дві сторони, бо ці пробіли тоді згразу з'їдало.

А методом експериментів з символами ASCII виявив, що можна замість знаків табуляції ставити char(2)
Для того, щоб поставити такі символи на початках абзаців потрібно просто поставити подвійні пробіли, потім виділити текстові блоки, які треба вирівнювати по дві сторони і запустити цей скрипт:

Код:
$c2=@Calc char(2)
$c2=@DequoteText $c2
$NS=0
%Start
$NS=@Map.NextSelected $NS
@if $NS=0 then @Break
$Text=@Map.Object[$NS].TableText
$Text=@ReplaceChar "~$Text
$Text=@Calc replace("$Text","  ","$c2")
$Text=@DequoteText $Text
$Text=@ReplaceChar ~"$Text
@Map.Object[$NS].TableText $Text
@Window.Refresh
@Goto %Start


І вуаля - тепер текст можна вирівнювати по дві сторони із збереженням абзаців.

Цікавить ще також думка розробників Digitals, чи не викличе це якихось конфліктів в програмі? Може цей символ використовується де-інде?

Ще б придумати, як зробити щоб дати вигляду 29.12.2014 не переносило в нові рядки по частинах. І щоб текст вигляду "с.Волоща" також не переносило, залишаючи в одному рядку "с.", а наступному "Волоща". Є якісь символи для заборони перенесення в новий рядок? Чи для якогось особливого склеєння тексту?

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 24 июн 2020 16:03 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Чи можна додати підтримку в текстових блоках нерозривних пробілів?

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 25 июн 2020 08:34 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
fendak писал(а):
Чи можна додати підтримку в текстових блоках нерозривних пробілів?

Спробуйте char(160) замiсть char(32) - код символу пробiлу. Я в себе в меню його використовую для вiдображення декiлькох слiв в пунктi меню.

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 25 июн 2020 18:09 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Руслан Пархуць писал(а):
Спробуйте char(160) замiсть char(32) - код символу пробiлу. Я в себе в меню його використовую для вiдображення декiлькох слiв в пунктi меню.

без крапки працює, а з крапою (К. Пилипенко) - ділить по крапці. К. залишає в одному рядку, а Пилипенко - в іншому.
треба спеціальну крапку, яка не дозволяє переносити наступний після неї символ в новий рядок.

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 25 июн 2020 22:13 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
fendak писал(а):
Руслан Пархуць писал(а):
Спробуйте char(160) замiсть char(32) - код символу пробiлу. Я в себе в меню його використовую для вiдображення декiлькох слiв в пунктi меню.

без крапки працює, а з крапою (К. Пилипенко) - ділить по крапці. К. залишає в одному рядку, а Пилипенко - в іншому.
треба спеціальну крапку, яка не дозволяє переносити наступний після неї символ в новий рядок.

Тут два варiанти, або внести корективи розробникам в ф-цiю форматування переносу тексту: коли пiсля крапки є пробiл, тодi переносити, в iншому випадку нi, або писати самому аналiз коду з @Map.GetObjectParamBuf i ставити перенесення тексту (||) в потрiбному мiсцi. Будуть труднощi з текстом з лапками, бо не всi команди ф-цiї @Calc пiдтримують роботу з ними, можна скористатись ф-цiєю @StringToEscape, але це вже iнше питання ;)

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 06 июл 2020 07:24 
Специалист
Специалист

Зарегистрирован:
14 сен 2007 19:22
Сообщения: 46
Доброго дня!! Чи можна зробити перенос по словах в редакторі тексту, неудобно редагувати великі тексти.


Вернуться к началу
 Профиль Отправить email  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 1369 ]  На страницу Пред.  1 ... 82, 83, 84, 85, 86, 87, 88 ... 92  След.

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


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

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


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

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