Аналитика

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

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




Начать новую тему Ответить на тему  [ Сообщений: 10 ] 
Автор Сообщение
 Заголовок сообщения: Скриптовi функцiї
СообщениеДобавлено: 17 янв 2017 23:13 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
Доброго дня. Некоректно працює функцiя @If ... and ... then з мiнусовими значеннями

Код:
$P1=-5
$P2=-5
@if ($P1=-5) and ($P2=-5) then @goto %Ok
@Dialog.Message False
@Goto %End
%Ok
@Dialog.Message Ok
%End

FALSE

Код:
$P1=5
$P2=5
@if ($P1=5) and ($P2=5) then @goto %Ok
@Dialog.Message False
@Goto %End
%Ok
@Dialog.Message Ok
%End

TRUE

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


Последний раз редактировалось Руслан Пархуць 18 янв 2017 18:58, всего редактировалось 1 раз.

Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 18 янв 2017 17:23 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Руслан Пархуць писал(а):
Доброго дня. Не коректно працює функцiя @If ... and ... then з мiнусовими значеннями

$P1=-5
$P2=-5
@if ("$P1"="-5") and ("$P2"="-5") then @goto %Ok
@Dialog.Message False
@Goto %End
%Ok
@Dialog.Message Ok
%End

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


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

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
А так? Потрiбна робота з числами, а не текстом.
Хоча бачу, що i з плюсовими так само. Дякую.


$P1=-5.00
$P2=-5.00
@if ("$P1"="-5") and ("$P2"="-5") then @goto %Ok
@Dialog.Message False
@Goto %End
%Ok
@Dialog.Message Ok
%End

fendak писал(а):
@if ("$P1"="-5") and ("$P2"="-5") then @goto %Ok
У Вас на сайтi в роздiлi Системнi функцiї значення змiнних i значень не заключенi в лапки. Як правильно?

P.S. працює таким чином:
$P1=-5.00
$P2=-5.00
$P1=@RoundTo $P1 4
$P2=@RoundTo $P2 4
@if ($P1="-5.0000") and ($P2="-5.0000") then @goto %Ok
@Dialog.Message False
@Goto %End
%Ok
@Dialog.Message Ok
%End

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


Последний раз редактировалось Руслан Пархуць 20 янв 2017 02:30, всего редактировалось 1 раз.

Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 20 янв 2017 02:17 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
Доброго дня, не працює:
1. Ф-цiя @Calc Insert("s","t","x") з вставлянням пробiлу (як напряму так i @Calc char(32))
2. Ф-цiя @Text[N].IndexOf FindStr не враховує регiстр при пошуку тексту (якщо так задумано, тодi прохання додати параметр для "точного" пошуку).
Дякую.

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 20 янв 2017 10:49 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
fendak писал(а):
У Вас на сайтi в роздiлi Системнi функцiї значення змiнних i значень не заключенi в лапки. Як правильно?


я дотримуюся принципу - "максимального спрощення", тобто, якщо працює без лапок, то пишу без лапок, якщо не працює, як у прикладі вище, тоді вказую лапки. Тут нема строгих правил. Є різні варіанти.

@Calc Insert з пробілом дійсно не працює. Перевірив і в себе.

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 24 янв 2017 00:42 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
Формування стрiчки:
$A=10.01
$B=Приклад
$Res=$A $B

Результат 10.01 (коли $B=Example, тодi Результат '10.01 Example').

P.S. Варiант $A="10.01: $B=Приклад" тодi отримуємо потрiбний результат.

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 11 сен 2019 18:31 
Гуру
Гуру

Зарегистрирован:
05 апр 2012 10:20
Сообщения: 797
Откуда: Львівська область
Після вчорашнього оновлення перестала працювати скриптова функція @Text[N].FolderList, якщо не задавати конкретне розширення файлу, а формувати список зразу по усіх файлах, поставивши просто *

Наприклад, ось так:

@Text[5].FolderList * D:\Digitals\TD\Doc
$F=@Text[5].Text
@Dialog.Message $F

Раніше функція повертала список усіх файлів у папці, а тепер не бачить жодного файлу.

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

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


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 12 сен 2019 10:57 
Гуру
Гуру

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 2298
Откуда: Vinnytsia
Повернулись до старого варіанту, спробуйте у новій версії.

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


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 14 сен 2019 17:04 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 823
Откуда: Ліспроект Володимир Вовчанський
Прошу розробників: дайте, будь-ласка, роз'яснення як працює скриптова функція @Map.ParentObject Number [ParentLayer]. Адже вона повинна повертати номер батьківського об'єкта (найменшого полігону - того, що містить об'єкт з номером Number).

Насправді незрозуміло як ця функція працює. Застосована без параметра ParentLayer, вона повертає номер батьківського об'єкта лише тоді, коли об'єкт Number було створено в тому ж шарі, що і батьківський. Інакше, повертається номер не найменшого полігона, що містить об'єкт Number.

Демонстрація проблеми у відео
Вложение:
Map_ParentObject.exe [523.72 Кб]
Скачиваний: 439


Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Скриптовi функцiї
СообщениеДобавлено: 08 дек 2023 17:54 
Гуру
Гуру
Аватара пользователя

Зарегистрирован:
22 сен 2007 16:09
Сообщения: 382
Откуда: м.Львiв
Доброго дня. При виконанні скрипта з немодальним вікном @Dialog.WaitBox при виклику іншого скрипта зникають змінні (які співпадають, міняються на поточні, інші - витираються). Чи є варіант вирішення, дякую.
Приклад додаю.

Кнопка-1
Код:
$X=100
$Y=200
@Dialog.WaitBox X=$X|Y=$Y|Запустіть інший скрипт
@Dialog.Message Результат після виконання|X=$X|Y=$Y

Кнопка-2
Код:
$X=5000
@While $X>2000 %Loop
$X=$X-100
;... якась функція
%Loop
@Dialog.Message Скрипт завершено з результатом $X


P.S. Як вихід - використав @Map.TempString для збереження змінних до запуску @Dialog.WaitBox а потім відновив значення цих змінних.

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


Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 10 ] 

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


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

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


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

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