Аналитика

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

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




Начать новую тему Ответить на тему  [ Сообщений: 1369 ]  На страницу Пред.  1 ... 28, 29, 30, 31, 32, 33, 34 ... 92  След.
Автор Сообщение
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 29 янв 2011 18:10 
Гуру
Гуру

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

Для чого переписати :shock: Можна дописати:
$T1=@Dialog.Ask Вкажіть шар що буде додавтись до списку
$A=@Map.Layers.List
@Text.Text=$A
$B=@Text.Count
$i=1
%Start
$T=@Text.Line[$i]
$T2=@StringPart 1 $T
@If $T2=$T1 then @Break Шар ID$T1 існує в карті|не може бути доданий
$i=$i+1
@if $i=$B then @Break Шар ID$T1 не знайдено в карті|може бути доданий
@Goto %Start

Але чому не працює:
$T2=@Calc Pos($T1,$T) хоча $T2=@Calc Pos(314,31405600) повертає 1. Невже Pos() та подібні для роботи з текстом не працюють зі змінними?
Розтолкуйте, будь-ласка, можливості функцій в парі з @Calc


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

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 2298
Откуда: Vinnytsia
voha писал(а):
Але чому не працює:
$T2=@Calc Pos($T1,$T) хоча $T2=@Calc Pos(314,31405600) повертає 1. Невже Pos() та подібні для роботи з текстом не працюють зі змінними?

Чому не працює? Працює, перевірьте на наступному прикладі.
Цитата:
$T=1234567890
$T1=456
$T2=@Calc Pos($T1,$T)
@Dialog.Message $T2

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


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

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 823
Откуда: Ліспроект Володимир Вовчанський
Dmitry_Zolotar писал(а):
Чому не працює? Працює, перевірьте на наступному прикладі.
Цитата:
$T=1234567890
$T1=456
$T2=@Calc Pos($T1,$T)
@Dialog.Message $T2

Але тоді чому:
$T1=@Dialog.Ask Вкажіть шар що буде додавтись до списку
$A=@Map.Layers.List
@Text.Text=$A
$B=@Text.Count
$i=1
%Start
$T=@Text.Line[$i]
$T2=@Calc Pos($T1,$T)
@Dialog.Message $T2
@If $T2=1 then @Break Шар ID$T1 існує в карті|не може бути доданий
$i=$i+1
@if $i=$B then @Break Шар ID$T1 не знайдено в карті|може бути доданий
@Goto %Start


Вложения:
.bmp
.bmp [ 85.69 Кб | Просмотров: 10995 ]
Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 30 янв 2011 14:32 
Гуру
Гуру

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 823
Откуда: Ліспроект Володимир Вовчанський
Є функція POS(Подстрока,S)
Возвращает позицию первого вхождения подстроки в строке S
Відповідно треба функцію RevPos(Подстрока,S)
Повертає позицію першого входження (з початку рядка), але перегляд на входження починає з кінця рядка S.

Можливий варіант: добавити функцію @GetFileName Filename - повертатиме коротке ім'я файла з його повного ім'я (повне ім'я файла включає шлях до файла) по аналогії з @GetFilePath Filename - повертає шлях до файла з повного ім'я.
Підкажіть, будь-ласка, як по-іншому (крім циклічного пошуку Pos() в скрипті) отримати коротке ім'я файла, вибраного в @Dialog.OpenFile *.txt, наприклад.


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

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 823
Откуда: Ліспроект Володимир Вовчанський
Проколи :shock: , чи то приколи :lol: з функцією Pos(), або я бамбула :oops: . Мабуть Pos() працює тільки з цифрами :?: Не сумнівайтесь, всі знаки рядків набрані при кириличній розкладці.


Вложения:
.JPG [108.79 Кб]
Скачиваний: 0
Вернуться к началу
 Профиль Отправить email  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 05 фев 2011 19:11 
Эксперт
Эксперт
Аватара пользователя

Зарегистрирован:
12 дек 2010 17:43
Сообщения: 50
Откуда: Симферополь
Я предлагаю в модуль geodesy встроить расчёт и уравнивание основных видов засечек (прямую, обратную и т. д.)

_________________
Изображение


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

Зарегистрирован:
06 янв 2008 17:06
Сообщения: 636
Откуда: Одеса
Є вже таке.
В папці з Діджіталс повинні бути ГДС-файли з прикладом опису такого роду ходів.
Якщо не знайдете, то ось він:
Вложение:
zasechka.zip [3.11 Кб]
Скачиваний: 392

І ще пошукайте по форуму. Може хтось колись і згадував подібне.


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

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 823
Откуда: Ліспроект Володимир Вовчанський
У вікні редактування скрипта, в лівій частині радка стану, відображається дата і час останньої зміни панелі інструментів.
Дайте, будь-ласка, функцію, ака б повертала вказане значення. Дуже прошу :wink: , хоча б це, для захисту скрипта :oops:
Закрити текст скрипта паролем


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

Зарегистрирован:
13 мар 2007 09:46
Сообщения: 2
Откуда: Кировоград
Есть файл http://file.qip.ru/file/QKEJC9Xu/%D0%A3 ... %9B_3.html
нужно его сохранить в акад чтобы остались кружечки вокруг текста.
Все прекрасно сохраняется кроме маски вокруг текста.
Если слой ставлю условным знаком сохраняется, а если надпись с маской через параметры - нет

видимо условный знаки для маски не конвертирует

Конвертировать все условные знаки включено


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Запрос на функцию
СообщениеДобавлено: 01 мар 2011 12:19 
Эксперт
Эксперт
Аватара пользователя

Зарегистрирован:
12 дек 2010 17:43
Сообщения: 50
Откуда: Симферополь
Предлогаю создать функцию, которая бы трансформировала систему координат в файлах привязки.

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

_________________
Изображение


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

Зарегистрирован:
18 апр 2007 11:55
Сообщения: 2298
Откуда: Vinnytsia
zubenko1592 писал(а):
Предлогаю создать функцию, которая бы трансформировала систему координат в файлах привязки.

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

Шаблон сбора - Полигон

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


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

Зарегистрирован:
12 дек 2010 17:43
Сообщения: 50
Откуда: Симферополь
zubenko1592 писал(а):
Предлогаю создать функцию, которая бы трансформировала систему координат в файлах привязки.

А это?
Чтобы понять что я хочу, почитайте тут пост от 01 мар 2011 09:40

_________________
Изображение


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

Зарегистрирован:
19 мар 2011 21:41
Сообщения: 1
Функцию новую напишу сам, если пойму вот чего: формат хранения геометрии в pgsql. Пока понятно, что геометрия хранится в поле geometry типа bytea. Поэтому стандартная функция AsText его не берет и даже обрывает коннект к базе. А дальше это может быть что угодно. Но мне кажется, что это все-таки XML кодированное, а поэтому convert_from должно помочь, но я не знаю какая кодировка и перебором не очень получилось. Хотелось бы помощи получить.
Очень нужно для вывода объектов из кадастровой карты на гугль_мап.


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

Зарегистрирован:
26 фев 2007 12:04
Сообщения: 1751
Откуда: Vinnitsa
В формате хранения SQLMode=0 геометрия записывается во внутреннем бинарном представлении. При SQLMode=1 - в OGC WKB формате, представленном в виде hex строки.

А для вывода карты в гугль мап в Digitals уже имеются готовые функции.

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


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

Зарегистрирован:
06 июн 2010 06:35
Сообщения: 823
Откуда: Ліспроект Володимир Вовчанський
Допоможіть, будь-ласка, з функцією @Map.CreateSharedBorder [LayerIndex] :!:
@Map.CreateSharedBorder [LayerIndex] створює об'єкт по спільній межі двох суміжних полігонів, де [LayerIndex] - мав би бути ID шару, в якому створюється об'єкт. Все, здається, зрозуміло, але питання:

як використати практично цю функцію, коли в ході виконання скрипта треба дати можливість вибрати шар для створення?
Варіанти вирішення:

1.Оскільки на момент виконання @Map.CreateSharedBorder [LayerIndex] селектовано два сусідніх об'єкти, навіть якщо на вкладці збір вибрано шар необхідний для створення, який [LayerIndex] вказати, щоб створений об'єкт був у вибраному шарі?
Або поряд з @Map.SetCollectionLayer LayerIndex, має бути функція @Map.GetCollectionLayer, яка повертала б ID шару збору.

2.
$Layer=@ExecuteMenu More1
де More1 - внутрішнє ім'я пункта меню Шар | Ще...
в цьому випадку $Layer рівна нулю, тобто @ExecuteMenu More1 не повертає результат вибору шару збору.

3.
$Layers=@Map.Layers.List
$LayerText=@Dialog.Select Шар|$Layers
$IDLayer=@StringPart 1 $LayerText
в результаті змінна $LayerText порожня, і не містить ID вибраного шару та назву шару

Дик, як же отримати вибраний шар?


Вернуться к началу
 Профиль Отправить email  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 1369 ]  На страницу Пред.  1 ... 28, 29, 30, 31, 32, 33, 34 ... 92  След.

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


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

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


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

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