| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Увеличение всех отметок на определенную величину

Увеличение всех отметок на определенную величину

Ответ
Поиск в этой теме
Непрочитано 22.11.2007, 11:47
Увеличение всех отметок на определенную величину
Drweb
 
Регистрация: 22.11.2007
Сообщений: 10

Парни, довольно срочно нужно изменить все отметки съемки на одну и ту же величину (отметки просто в виде текста), есть ли уже готовое решение?
Просмотров: 42455
 
Непрочитано 28.10.2009, 08:39
#61
kshatriy


 
Регистрация: 06.08.2008
Сообщений: 30


Красота! Спасибо еще раз!!!
kshatriy вне форума  
 
Непрочитано 29.10.2009, 14:52
#62
kshatriy


 
Регистрация: 06.08.2008
Сообщений: 30


еще просьба (если возможно): есть текст "Уголок L50x5 L=200" или др.

требуется : математические операции проводились только с числом стоящим после "L="
было: "Уголок L50x5 L=200"
+100
получили:"Уголок L50x5 L=300"
возможно? (лисп #58)
kshatriy вне форума  
 
Непрочитано 30.10.2009, 13:05
#63
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787


kshatriy, поищи тему наподобие "суммирование текстов". Точно помню, что подобный вопрос решался.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 30.10.2009, 13:06
#64
dextron3

проектировшик
 
Регистрация: 01.01.2007
СССР
Сообщений: 5,143


kshatriy, пиши длинну отдельным тектсовым приметивом
__________________
инженер проектировшик с опттом программа авто гад образование высшие
dextron3 вне форума  
 
Непрочитано 31.10.2009, 07:09
#65
kshatriy


 
Регистрация: 06.08.2008
Сообщений: 30


Кулик Алексей aka kpblc: ты про это: "Как сосчитать сумму цифр из отдельных мтекстов (и лисп для подсчета спецификаций)" #522 ?
тот лисп заменяет цифры второго текста на цифры первого удалив все буквы:
было:"Уголок L50x5 L=200" и "Уголок L50x5 L=300" выбрал первый текст, выбрал второй.
результат: второй текст стал "Уголок L505200x505200 L=505200"

dextron3: Использую PS Studio
там спецификации заполняются текстами вида:
Труба 159x6 L=3400
Швеллер [20 L=370
Уголок L75x6 L=200

возможно програмно отделить длину?
kshatriy вне форума  
 
Непрочитано 31.10.2009, 16:34
#66
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 39,787


Цитата:
Сообщение от kshatriy Посмотреть сообщение
возможно програмно отделить длину?
Можно. И в той самой теме есть коды, выполняющие это действие.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Непрочитано 02.11.2009, 10:28
#67
Do$

AutoCAD/Civil3D LISP/C#
 
Регистрация: 15.08.2008
Санкт-Петербург
Сообщений: 1,702
Отправить сообщение для Do$ с помощью Skype™


Там еще один косяк был - если в запрос точности вводить ноль и результат вычисления получается целым числом с нулями на конце, то они обрезаются. Например: 3500-100 получалось 34. В общем, исправил и дополнил с учетом этого:
Цитата:
Сообщение от kshatriy Посмотреть сообщение
там спецификации заполняются текстами вида:
Труба 159x6 L=3400
Швеллер [20 L=370
Уголок L75x6 L=200

возможно програмно отделить длину?
Вложения
Тип файла: lsp test.lsp (5.2 Кб, 122 просмотров)
Do$ вне форума  
 
Непрочитано 03.11.2009, 12:08
#68
kshatriy


 
Регистрация: 06.08.2008
Сообщений: 30


Работает как требовалось спасибо Do$! появилась другая проблемка в текстах с символами юникода
эти символы заменяются вопросительными знаками
Было:
ДТруба 10x1 L=1140
Двутавр \U+E72910 L=3500
Швеллер \U+E7255П L=1090
Тавр \U+E72B10БТ1 L=770
-100
получаем:
Труба 10x1 L=1040
Двутавр ?10 L=3400
Швеллер ?5П L=990
Тавр ?10БТ1 L=670

возможно сохранить эти символы?
Вложения
Тип файла: rar шрифт и файл 2004.rar (47.2 Кб, 71 просмотров)

Последний раз редактировалось kshatriy, 04.11.2009 в 06:17.
kshatriy вне форума  
 
Непрочитано 03.11.2009, 14:58
#69
Do$

AutoCAD/Civil3D LISP/C#
 
Регистрация: 15.08.2008
Санкт-Петербург
Сообщений: 1,702
Отправить сообщение для Do$ с помощью Skype™


Символы не должны никуда теряться, если посмотреть свойства текста - то там все как надо написано. Наверное используемый текстовый стиль такие символы не поддерживает.
Файл не могу посмотреть, т.к. у меня акад 2006.
Do$ вне форума  
 
Непрочитано 04.11.2009, 06:20
#70
kshatriy


 
Регистрация: 06.08.2008
Сообщений: 30


перезалил #68 (сохранил в 2004)
kshatriy вне форума  
 
Непрочитано 04.11.2009, 09:23
#71
Do$

AutoCAD/Civil3D LISP/C#
 
Регистрация: 15.08.2008
Санкт-Петербург
Сообщений: 1,702
Отправить сообщение для Do$ с помощью Skype™


Вот казалось бы, одно и то же:
Код:
[Выделить все]
(vla-get-textstring (vlax-ename->vla-object (car (entsel))))
(cdr (assoc 1 (entget (car (entsel)))))
А результат разный:
Код:
[Выделить все]
"Двутавр ?10 L=3500"
"Двутавр \U+E72910 L=3500"
В коде заменил одно на другое, теперь вроде все
Вложения
Тип файла: lsp test.lsp (5.6 Кб, 331 просмотров)
Do$ вне форума  
 
Непрочитано 05.11.2009, 11:53
#72
kshatriy


 
Регистрация: 06.08.2008
Сообщений: 30


Do$:работает символы в норме..
огромное спасибо !!!
kshatriy вне форума  
 
Непрочитано 25.10.2010, 12:05
#73
Alex II


 
Регистрация: 27.11.2007
Сообщений: 126


Помогите пожалуйста.
У мена на чертеже идёт нумерация объектов, от 1 и до 500. В середине появляется дополнительный объект, и нумерацию нужно сдвинуть. Ест ли простой лиспик, который мог бы увеличивать выделенные числа (text) на заданую величину? Почемуто лисп из первых постов не работает. ACAD2010.
Alex II вне форума  
 
Непрочитано 25.10.2010, 12:12
#74
Do$

AutoCAD/Civil3D LISP/C#
 
Регистрация: 15.08.2008
Санкт-Петербург
Сообщений: 1,702
Отправить сообщение для Do$ с помощью Skype™


С этим как раз тут разбираемся:
http://forum.dwg.ru/showthread.php?t=58884
Do$ вне форума  
 
Непрочитано 25.10.2010, 20:07
#75
gomer

строю, ломаю
 
Регистрация: 03.04.2008
Украина
Сообщений: 5,515


Цитата:
Сообщение от Alex II Посмотреть сообщение
на чертеже идёт нумерация объектов, от 1 и до 500. В середине появляется дополнительный объект, и нумерацию нужно сдвинуть
Возможно вам поможет INCDEC
gomer вне форума  
 
Непрочитано 26.10.2010, 11:19
#76
Alex II


 
Регистрация: 27.11.2007
Сообщений: 126


Большое спасибо, очень кстати
Alex II вне форума  
 
Непрочитано 12.09.2012, 09:32
#77
timoshetc


 
Регистрация: 04.07.2012
Сообщений: 36


добрый день! у меня мультитекст след содержания "165.33 - в. тр."
требуется прибавить к отметке 1.02..(долго объяснять зачем, просто так надо))
пробовал лиспы plus, num, test - не работают( помогите плиз....очень нужно
timoshetc вне форума  
 
Непрочитано 12.09.2012, 12:41
#78
Boxa

КЖ; C#
 
Регистрация: 03.11.2005
Санкт-Петербург
Сообщений: 2,588


Все уже придумано и написано.
https://sites.google.com/site/bushma...-zametki/regex
Тут можно скачать библиотеку которая меняет что угодно на как угодно.

Спасибо говорить Андрею aka hwd
Boxa вне форума  
 
Непрочитано 12.09.2012, 14:12
#79
timoshetc


 
Регистрация: 04.07.2012
Сообщений: 36


как им воспользоваться? не загружается код
timoshetc вне форума  
 
Непрочитано 12.09.2012, 14:22
#80
Boxa

КЖ; C#
 
Регистрация: 03.11.2005
Санкт-Петербург
Сообщений: 2,588


Как то так : http://forum.dwg.ru/showthread.php?t=88453
Boxa вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > Увеличение всех отметок на определенную величину

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск