Аналитика
http://geosystema.net/forum/

Все про скрипти
http://geosystema.net/forum/viewtopic.php?f=1&t=2809
Страница 51 из 83

Автор:  sergykydr [ 25 сен 2016 20:50 ]
Заголовок сообщения:  Re: Все про скрипти

fendak Дякую!

Автор:  fendak [ 25 сен 2016 21:30 ]
Заголовок сообщения:  Re: Все про скрипти

Було б не погано, якби розробники Digitals описали як працюють функції @Map.Object[N].ParameterTag[N]<XMLTag>Value та @Map.Object[N].SetXMLTag ParamNumber Query Value

Чим вони відрізняються?

І чому одна функція редагує теги ось так:
@Map.Object[$SO].ParameterTag[ID7000522] <DraftingDate> $Data

а інша ось так:
@Map.Object[$SO].SetXMLTag id7000500 Settlement смт.Меденичі

тобто, без "[]" та "<>"

І зверніть увагу, що деякі теги (які далеко сховані) цими функціями взагалі не редагуються. Наприклад, ProprietorCode, паспортні дані. Не виходить редагувати і теги по наступних співвласниках.

Дякую.

Автор:  sergykydr [ 13 окт 2016 13:25 ]
Заголовок сообщения:  Re: Все про скрипти

Чому не змінюється шлях до файлу при такому коді:

@SendChars <TAB>
@SendChars <TAB>
@SendChars <TAB>
@SendChars D:\1.bmp<TAB>
@SendChars <TAB>
@SendChars <TAB>
@SendChars <TAB>
Экспорт в | BMP

а при такому змінюється:

@SendChars <TAB>
@SendChars <TAB>
@SendChars <TAB>
@SendChars D:\1.bmp<TAB>
Экспорт в | BMP

Автор:  Dmitry_Zolotar [ 13 окт 2016 13:34 ]
Заголовок сообщения:  Re: Все про скрипти

Спробуйте так:

@Map.SaveToTIF 300 24 D:\1.bmp

Автор:  voha [ 14 окт 2016 10:31 ]
Заголовок сообщения:  Re: Все про скрипти

Доброго дня розробникам.
Є в мене до вас прохання, щодо функції @Map.Object[N].Centroid - "Повертає координати центроїда полігона".

В лісовому господарстві зараз прийняли необхідність оприлюднювати "координати центра лісосіки". Вказана функція щонайліпше підходить для вирішення задачі скриптом, однак варто зазначити: координати, скоріш за все, мають бути географічними (градуси мінути секунди).

Скриптове вирішення може бути таким:
- визначення координат центроїда полігона в карті з пласкою системою координат;
- створення точкового об'єкта з координатами в центроїді полігона;
- зміна системи координат карти на "Широта/довгота";
- отримання географічних координат точкового об'єкта в десяткових градусах з точністю до 13-ти знаків функцією @Map.Object[N].Point[N];
- перерахунок географічних координат з десяткових градусів у градуси мінути секунди;
- відміна зміни системи координат карти @Map.Undo.Undo
- видалення точкового об'єкта з координатами в центроїді полігона.

Так от: якби функція @Map.Object[N].Centroid повертала б координати центроїда полігону не з точністю 3 знаки, а з максимальною точністю... Тоді не треба було б мати справу з тимчасовими об'єктами в карті.
По-менше би, в ході виконання скрипта, тимчасових змін в карті :!: Інакше, раптом скрипт не закінчить роботу з помилкою - матимем в карті непотріб.

Як ви порадите, може краще використати HTTP сервер пересчета координат? Але тут свої нюанси: блокування порта антивірусом, порт використовується іншим застосуванням.... Тоді додавати функцію dll, з усіма перевірками: чи порт відкритий, чи порт не зайнятий - яка поверне в скрипт масив координат :? Скільки часу треба юзеру мого рівня, щоб в Delphi її написати? Може є сенс додати скриптову функцію перерахунку координат точки?

Автор:  fendak [ 10 дек 2016 12:33 ]
Заголовок сообщения:  Re: Все про скрипти

Доброго дня.
Поясніть, будь-ласка, чому коли в скриптах віднімаю одну координату із трьохзначним числом після коми від іншої такої ж, получається астрономічне число?
Наприклад:

$Res=5473934.167-5473855.713
@Dialog.Message $Res

В результаті отримаємо 78,4539999999997

Чому в скриптах обрахунок не відповідає тому, що на калькуляторі? З якою це метою зроблено? Для чого призначені ці поправки?

Звичайно, для округлення ми можемо використати @Calc truns, але все ж цікаво, чому так є?

Дякую.

Автор:  Руслан Пархуць [ 10 дек 2016 13:56 ]
Заголовок сообщения:  Re: Все про скрипти

fendak писал(а):
Доброго дня.
Поясніть, будь-ласка, чому коли в скриптах віднімаю одну координату із трьохзначним числом після коми від іншої такої ж, получається астрономічне число?
Наприклад:

$Res=5473934.167-5473855.713
@Dialog.Message $Res

В результаті отримаємо 78,4539999999997

Чому в скриптах обрахунок не відповідає тому, що на калькуляторі? З якою це метою зроблено? Для чого призначені ці поправки?

Дякую.

Скорiше iз за типу float. Зробiть $Res=@RoundTo $Res 4 i буде все ок.

Автор:  Winter [ 13 дек 2016 13:27 ]
Заголовок сообщения:  Re: Все про скрипти

Доброго дня! Потрібен скрипт, який допомагає із вибірко обмінних файлів. Тобто є карта із завантаженими в неї обмінними файлами ІН4 і є реєстр кадастрових номерів, потрібно, щоб із карти автоматично вивантажувалися ІН4 обмінні файли згідно реєстру і зберігалися в папку. Наперед дякую!

Автор:  Orso [ 13 дек 2016 16:17 ]
Заголовок сообщения:  Re: Все про скрипти

Winter писал(а):
Доброго дня! Потрібен скрипт, який допомагає із вибірко обмінних файлів. Тобто є карта із завантаженими в неї обмінними файлами ІН4 і є реєстр кадастрових номерів, потрібно, щоб із карти автоматично вивантажувалися ІН4 обмінні файли згідно реєстру і зберігалися в папку. Наперед дякую!


Код:
@Map.DeselectAll
;
@Text.Load d:\3.txt
;Список з кад номерами
$I=1
;перша строка
$CountI=@Text.Count
;загальна кількість строк
%Start
;Початок циклу
;Збільшення індексу
$I=$I+1
@IF $I<=$CountI @Goto %Bum
;умова приривання циклу
;
@Break Закінчився список файлів
%Bum
$CN=@Text.Line[$I]
;
@Map.FindFirstByParameters 1|ID106=$CN
$S=@Map.SelCount
;
@If $S=0 @Goto %Messege
%Show:
@Window.ShowSelected
Файл | Извлечь участок в In4
;сохраняем обменник
@Map.SaveToFile
;закрываем обменник
@FileClose
%Skip
$I=$I+1
;
@ActivateMap 1
@Goto %Start
;
%Messege
;@Dialog.Message $CN Участок не найден
@Goto %Start

Автор:  Winter [ 13 дек 2016 17:24 ]
Заголовок сообщения:  Re: Все про скрипти

Дякую, скрипт і справді працює, але чомусь він вибирає ділянки через одну?

Автор:  Руслан Пархуць [ 13 дек 2016 19:40 ]
Заголовок сообщения:  Re: Все про скрипти

Заберiть один з $I=$I+1

Автор:  Winter [ 13 дек 2016 20:50 ]
Заголовок сообщения:  Re: Все про скрипти

Дякую!

Автор:  Winter [ 13 дек 2016 20:51 ]
Заголовок сообщения:  Re: Все про скрипти

Вибирає всі кадастрові номера по списку! Дякую!

Автор:  Winter [ 13 дек 2016 21:05 ]
Заголовок сообщения:  Re: Все про скрипти

Чомусь вибирає 30 ділянок і зависає :(

Автор:  Руслан Пархуць [ 14 дек 2016 14:03 ]
Заголовок сообщения:  Re: Все про скрипти

Попробуйте забрати @FileClose, а потiм закриєте самостiйно вiдкритi карти

Страница 51 из 83 Часовой пояс: UTC + 2 часа
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
http://www.phpbb.com/