Добро пожаловать!

Войдите или зарегистрируйтесь сейчас!

Войти

Лисп удаление в тексте нескольких первых символов

Тема в разделе "Autocad", создана пользователем victori*a, 21 окт 2016.

  1. victori*a

    Форумчанин

    Регистрация:
    13 май 2014
    Сообщения:
    38
    Симпатии:
    2
    Добрый день. Подскажите, пожалуйста, если ли такой лисп. Имеются много текстов однострочных. Необходимо удалить в них первые 9 символов (буквы, знаки, цифры). Обычной заменой текста не получится. Потому как символы буквы разные. Нужно просто одинаковое количество их с начала текста убрать.
     
    #1
  2. АлексЮстасу

    Форумчанин

    Регистрация:
    28 май 2012
    Сообщения:
    1.870
    Симпатии:
    668
    Адрес:
    Маськва
    Можно попробовать сохранить файл или только тексты в dxf, и с помощью notepad++ или т.п. сделать замены в группе:
     
    #2
    Последнее редактирование: 21 окт 2016
  3. ivsem

    Форумчанин

    Регистрация:
    26 мар 2009
    Сообщения:
    2.475
    Симпатии:
    1.051
    Адрес:
    Киев
    victori*a, выложи фрагментик чертежа.
     
    #3
  4. victori*a

    Форумчанин

    Регистрация:
    13 май 2014
    Сообщения:
    38
    Симпатии:
    2
    Здравствуйте. Вот фрагмент плана.
     

    Вложения:

    #4
  5. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.715
    Симпатии:
    601
    Адрес:
    Ухта
    victori*a, как вариант, после текста, например, ПК11+21.76 проставить второй пробел, этим лиспом разделить строки на составляющие, а затем отфильтровать по маске текста (ПК или +) Поиском или Фильтром, и удалить.
     

    Вложения:

    #5
  6. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.534
    Симпатии:
    2.072
    Адрес:
    Москва
    Неее :)

    Там делов на 5 минут, написать программу.

    Просили на LISP, поэтому я пас :)
     
    #6
  7. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.715
    Симпатии:
    601
    Адрес:
    Ухта
    Philin, я думаю не принципиально на каком языке программирования будет написан код,на Autolisp или VBA. Наверняка топикстартер в этом плане выразился обобщенно.
     
    #7
  8. 1958

    Форумчанин

    Регистрация:
    21 авг 2013
    Сообщения:
    639
    Симпатии:
    699
    Адрес:
    СССР, город хлебный
    Пробуй!
     

    Вложения:

    • pk_del.LSP
      Размер файла:
      641 байт
      Просмотров:
      125
    #8
    victori*a нравится это.
  9. ivsem

    Форумчанин

    Регистрация:
    26 мар 2009
    Сообщения:
    2.475
    Симпатии:
    1.051
    Адрес:
    Киев
    victori*a, программка выбирает тексты в начале которых стоит сочетание ПК или Пк или пк и удаляет литеры ПпКк+0123456789., от начала текста до первого иного символа. В данном случае это пробел. Пробелы в начале текста так же удаляются.
    Запуск программы - набрать 11 и нажать Enter или пробел.
     

    Вложения:

    #9
    victori*a нравится это.
  10. АлексЮстасу

    Форумчанин

    Регистрация:
    28 май 2012
    Сообщения:
    1.870
    Симпатии:
    668
    Адрес:
    Маськва
    Я тоже поддался на
    ... ::biggrin24.gif::
    А ведь штатная _FIND (НАЙТИ) такую замену текста делает без проблем:
    FIND_Replace.png
     
    #10
    Steinar, gorelikoff13, Alexandr-GR и ещё 1-му нравится это.
  11. sergtor

    Форумчанин

    Регистрация:
    23 сен 2012
    Сообщения:
    1.715
    Симпатии:
    601
    Адрес:
    Ухта
    АлексЮстасу, а какие управляющие символы Вы используете для замены?
     
    #11
  12. АлексЮстасу

    Форумчанин

    Регистрация:
    28 май 2012
    Сообщения:
    1.870
    Симпатии:
    668
    Адрес:
    Маськва
    ? - один любой символ.
    См. в Help:
    About Finding and Replacing Text

    FIND_Replace_Help.png
     
    #12
    sergtor нравится это.
  13. ivsem

    Форумчанин

    Регистрация:
    26 мар 2009
    Сообщения:
    2.475
    Симпатии:
    1.051
    Адрес:
    Киев
    Задача была не заменить часть текста на что-то (например на один пробел), а удалить эту часть вместе с пробелом.
    Да и пикет штука переменной длины ПК1+15.21 ПК11+15.21 ПК111+15.21
     
    #13
    sergtor нравится это.
  14. АлексЮстасу

    Форумчанин

    Регистрация:
    28 май 2012
    Сообщения:
    1.870
    Симпатии:
    668
    Адрес:
    Маськва
    Задача была удалить именно первые 9 (оказалось - 11) символов. И заменить их можно не на пробел, а на ничто, т.е. удалить.
     
    #14
  15. victori*a

    Форумчанин

    Регистрация:
    13 май 2014
    Сообщения:
    38
    Симпатии:
    2
    Здравствуйте. АлексЮстасу я первоначально не совсем точно задала вопрос. Спасибо за предложенное решение.
    Очень помогли программы ivsem и 1958, то что нужно. Быстро и легко теперь справиться с поставленной задачей. Большое спасибо всем за помощь.
     
    #15
  16. gorelikoff13

    Форумчанин

    Регистрация:
    16 янв 2017
    Сообщения:
    36
    Симпатии:
    0
    Красаучек))) Спасибо, очень помог.
     
    #16

Поделиться этой страницей

  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление