![]() |
|
Аналог ИзСтрокиСРазделителями() в 1св8 | ☑ | ||
---|---|---|---|---|
0
vladko
22.09.11
✎
10:42
|
Переделываю обработку загрузки из текстового файла, который был сделан для 7.7. Не могу найти Аналог .ИзСтрокиСРазделителями() для перевода строки табличного документа в список значений.
В 7.7. было: Для н = 1 По ТХТ.КоличествоСтрок() Цикл Стр = ТХТ.ПолучитьСтроку(н); СЗ.ИзСтрокиСРазделителями(Стр); //ну и далее Код = СЗ.ПолучитьЗначение(1) и т.д. КонецЦикла; |
|||
1
vladko
22.09.11
✎
10:49
|
пока придумал корявое решение через массив
Масс = Новый Массив; Масс.Очистить(); Для н = 1 по ТХТ.КоличествоСтрок() Цикл Стр = СтрЗаменить(ТХТ.ПолучитьСтроку(н),"""",""); Пока Найти(Стр,",") Цикл Поз = Найти(Стр,","); Масс.Добавить(Лев(Стр,Поз-1)); Стр = Прав(Стр, СтрДлина(Стр)-Поз); КонецЦикла; Масс.Добавить(Лев(Стр,Поз-1)); Код = Масс.Получить(0); |
|||
2
butterbean
22.09.11
✎
10:50
|
СтрЗаменить(ТХТ.ПолучитьСтроку(н),",",Символы.ПС) и потом выбирай из многострочной строки
|
|||
3
jsmith82
22.09.11
✎
10:51
|
Функция ПолучитьМассивСтрок(String, Separator) Экспорт
ArrayRow = New Array(); Lit = ""; For i = 1 To StrLen(String) Do Character = Mid(String, i, 1); If Character = Separator Then ArrayRow.Add(Lit); Lit = ""; Else Lit = Lit + Character; EndIf; EndDo; ArrayRow.Add(Lit); Return ArrayRow; КонецФункции |
|||
4
Gesperid10
22.09.11
✎
10:53
|
(C) 1С |
|||
5
Maxus43
22.09.11
✎
10:55
|
||||
6
vladko
22.09.11
✎
10:58
|
спасибо всем.
В 7.7. было 3 строки, в 8.х куча |
|||
7
Maxus43
22.09.11
✎
10:59
|
(6) в 8-ке одна строка. кури (5)
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |