helpf.pro
  Регистрация
Все категории » Работа с Текстом (Строкой) Работа с Текстом (Строкой) 
 +3 
 
 
Распечатать

Функция разбора (разложения) строки в массив, аналог СтрРазделить

Код 1C v 8.х
 Функция РазложитьСтрокуВМассивПодстрок(Знач Строка, Знач Разделитель = ",",

    Знач ПропускатьПустыеСтроки = Неопределено)

 

    Результат = Новый Массив;

 

    // для обеспечения обратной совместимости

    Если ПропускатьПустыеСтроки = Неопределено Тогда

        ПропускатьПустыеСтроки = ?(Разделитель = " ", Истина, Ложь);

        Если ПустаяСтрока(Строка) Тогда 

            Если Разделитель = " " Тогда

                Результат.Добавить("");

            КонецЕсли;

            Возврат Результат;

        КонецЕсли;

    КонецЕсли;

    //

 

    Позиция = Найти(Строка, Разделитель);

    Пока Позиция > 0 Цикл

        Подстрока = Лев(Строка, Позиция - 1);

        Если Не ПропускатьПустыеСтроки Или Не ПустаяСтрока(Подстрока) Тогда

            Результат.Добавить(Подстрока);

        КонецЕсли;

        Строка = Сред(Строка, Позиция + СтрДлина(Разделитель));

        Позиция = Найти(Строка, Разделитель);

    КонецЦикла;

 

    Если Не ПропускатьПустыеСтроки Или Не ПустаяСтрока(Строка) Тогда

        Результат.Добавить(Строка);

    КонецЕсли;

 

    Возврат Результат;

 

КонецФункции

Источник

зы: админ, вот искал аналог СтрРазделить с игнорированием пустых строк - не нашел,зато нашел много дублей: https://helpf.pro/faq/view/504.html https://helpf.pro/faq/view/171.html https://helpf.pro/faq/view/351.html

, объедини пожалуйста.

зыы: кнопкой вставки ссылки невозможно пользоваться, ну что за извращенство с подменю, сделай одинарной как везде.

Разместил:   Версии: | 8.2 УП | 8.3 |  Дата:   Прочитано: 23578
 +3 
 
 
Распечатать
Возможно, вас также заинтересует
Как заполнить табличную часть формы программно?  6
  Нужно по кнопке Заполнить - сформировать данные для заполнения табличных частей и заполнить их. Форма имеет вид: Рядом с кнопкой Записать и закрыть добавлена кнопка Заполнить документ , код ее команды: // Код заполнения ТЧ НаСервере П
10060 (0x0000274C): Попытка установить соединение была безуспешной  16
  Установили новый терминальный сервер, на нем подняли 1С, терминальные пользователе неописуемо довольны, все просто летает :) И вот же надо было такому случиться, главному бухгалтеру не понравилось работать через терминал, а еще у нее свой ноутбук и
17 правил для составления оптимального ЗАПРОСа к данным базы 1С  38
  Для формирования и выполнения запросов к таблицам базы данных в платформе 1С используется специальный объект языка программирования Запрос . Создается этот объект вызовом конструкции Новый Запрос . Запрос удобно использовать, когда требуется получ
1C: Enterprise Development Tools  49
  И вот случилось долгожданное: Вышел 1C: Enterprise Development Tools - это среда для разработки конфигурации в IDE Eclipse. С сайта 1С: « 1C:Enterprise Development Tools » – это инструмент нового поколения для разработчиков бизнес-приложений систем
COM-соединение не обнаружило свободной лицензии / ключ защиты  0
 Иногда при подключении к 1С возникает ошибка: COM-соединение не обнаружило свободной лицензии! COM-соединение не обнаружило ключ защиты программы! https://helpf.pro/uploads/img/_1-UsuyAg6E2P.jpg В таких случаях, иногда, может помочь следующий с
Посмотреть все результаты поиска похожих
Комментарии
kuzyara
17.10.2018 10:48Комментарий: 1
kuzyara

Спасибо, пригодилось! Но правильно будет так:

Код 1C v 8.х
 Функция СтрРазделить(Знач ИсходнаяСтрока, Знач Разделитель, ВключатьПустые = Истина) Экспорт

    Возврат СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивПодстрок(ИсходнаяСтрока, Разделитель, НЕ ВключатьПустые);

КонецФункции // СтрРазделить()







Источник: http://forum.aeroion.ru/topic916.html
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.