Skip to content

Commit 48a6706

Browse files
committed
Fix #1. Возможность создания коллекции из строки с указанием разделителя строк
1 parent 01be5d5 commit 48a6706

File tree

2 files changed

+27
-7
lines changed

2 files changed

+27
-7
lines changed

src/Модули/Потоки.os

Lines changed: 13 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -9,17 +9,23 @@
99
Возврат Стрим;
1010
КонецФункции
1111

12-
Функция ИзСтроки(Строка) Экспорт
13-
Коллекция = Новый Массив;
14-
ДлинаСтроки = СтрДлина(Строка);
15-
Для сч = 1 По ДлинаСтроки Цикл
16-
Коллекция.Добавить(Сред(Строка, сч, 1));
17-
КонецЦикла;
18-
12+
Функция ИзСтроки(Строка, РазделительСтрок = Неопределено, ВключатьПустые = Истина) Экспорт
13+
14+
Если РазделительСтрок = Неопределено Тогда
15+
Коллекция = Новый Массив;
16+
ДлинаСтроки = СтрДлина(Строка);
17+
Для сч = 1 По ДлинаСтроки Цикл
18+
Коллекция.Добавить(Сред(Строка, сч, 1));
19+
КонецЦикла;
20+
Иначе
21+
Коллекция = СтрРазделить(Строка, РазделительСтрок, ВключатьПустые);
22+
КонецЕсли;
23+
1924
Стрим = Новый Стрим();
2025
Стрим.УстановитьКоллекцию(Коллекция);
2126

2227
Возврат Стрим;
28+
2329
КонецФункции
2430

2531
Функция СтандартныйОбработчикСравнения() Экспорт

test.os

Lines changed: 14 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -77,3 +77,17 @@
7777
.ИзСтроки(Строка)
7878
.Сортировать()
7979
.ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());
80+
81+
Строка = "Я строка с пробелами";
82+
Потоки
83+
.ИзСтроки(Строка, " ")
84+
.ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());
85+
86+
Строка =
87+
|многострочная
88+
|строка";
89+
90+
Потоки
91+
.ИзСтроки(Строка, Символы.ПС)
92+
.Сортировать()
93+
.ДляКаждого(Потоки.СтандартныйОбработчик_Сообщить());

0 commit comments

Comments
 (0)