Имя: Пароль:
1C
1C 7.7
v7: Перебор строки посимвольно
0 sashenka
 
04.10.12
07:40
Здравствуйте.
Подскажите, как в 1С скриптах перебрать строку посимвольно?

Такая конструкция не работает.

Для i = 1 по strlen(текст) цикл
если текст[i] <> '' тогда т2=т2+текст[i];
конеццикла;
1 Плот
 
04.10.12
07:44
если текст[i] вот  это что?
2 Strogg
 
04.10.12
07:44
Для каждого стр из СтрДлина(ТвояСтрока) цикл
    СледующийСимвол = Сред(ТвояСтрока, стр, 1);
КонецЦикла;
как-то так...
3 Strogg
 
04.10.12
07:46
Бл....
Для стр = 1 по СтрДлина(ТвояСтрока)
4 dk
 
04.10.12
07:49
конструкция
если текст[i] <> '' тогда т2=т2+текст[i];  
впечатляет )))
5 Mikeware
 
04.10.12
07:50
(4) больше впечатляет то, что оно умудрилось не заглянуть в СП...
6 ADirks
 
04.10.12
07:52
(1) а мне гораздо интереснее, что такое  ''
так то в итоге получим  т2 = текст;
7 Strogg
 
04.10.12
07:53
(5) да ладно тебе. Он, по ходу, и не одинэсник. Ты слышал когда-нибудь от одинэсников: "как в 1с скриптах(!) сделать тото?"
8 Mikeware
 
04.10.12
07:55
(7) И пофиг.
просто любое дело нужно начинать с чтения документации...
9 sashenka
 
04.10.12
07:55
(7) вы правы.. я не одинэсник.. просто надо сделать )
(4)(1) стандартная обработка строк
10 sashenka
 
04.10.12
07:55
(8) да читал я .. уж поверьте
11 sashenka
 
04.10.12
07:56
(2) спасибо
12 Mikeware
 
04.10.12
07:56
(6) ты ж не знаешь, что было в т2 до цикла :-)
ну а то, что существо не понимает, что бывают операции не только над символми, но и над строками - увы....
13 sashenka
 
04.10.12
07:57
(12) Я знаю что было в т2 ) Я просто тут не написал )
14 Mikeware
 
04.10.12
07:57
(10) угу... "читал, но не смог прочитать"
15 Мимохожий Однако
 
04.10.12
07:59
ОФФ: Угадал все буквы, но не смог назвать слово
16 sashenka
 
04.10.12
07:59
(14) кхе... Вы конечно можете не верить, но скажу честно, что обе части по программированию на скриптовом 1С 7.7 прочел практически полностью.. :)
17 dk
 
04.10.12
08:00
(9) я вот слабо представляю как в середине строки может встретиться пустой символ "", или у тебя там на пробел проверяется?
18 Mikeware
 
04.10.12
08:00
(16) значит, все еще хуже - проблемы с пониманием написанного...
19 sashenka
 
04.10.12
08:02
(17) у меня есть значение 14 000.00, а мне надо 14000.00
число динамическое...
20 VladZ
 
04.10.12
08:02
(10) Если читал, укажи с какого раздела взял это: если текст[i] <> '' тогда т2=т2+текст[i];
21 VladZ
 
04.10.12
08:03
(19) Замени пробел на пустое значение. Зачем всю строку-то перебирать?
22 Рэйв
 
04.10.12
08:04
(19) Нужное=СтрЗаменить(Строка(14 000.00)," ","");


Если это пробел конечно.  Если стандартный разрыв, то через формат
23 sashenka
 
04.10.12
08:05
(20) еще раз.. это стандартное программирование.. 1С сию конструкцию не поняла... поэтому я спросил... как делают люди пишущие на скриптовом 1С.
А кусать меня не надо )
(21) w2=СтрЗаменить(w1,' ',''); пробовал... результат правда не смотрел.. особо... но в выход у меня идет не то что надо... ну я думаю проблема у меня в другом...
24 sashenka
 
04.10.12
08:05
(22) спасибо
25 sashenka
 
04.10.12
08:05
(22) про этот вариант знаю.. меня интересовал посимвольный перебор )
26 sashenka
 
04.10.12
08:06
(18) Вы не правы :)
27 Mikeware
 
04.10.12
08:09
(23)"ну я думаю проблема у меня в другом..." - полностью согласен!!!! Проблема  - в ДНК.
28 sashenka
 
04.10.12
08:12
(27) ну вообщето я имел ввиду тип данных структуры DBF ) А хамить, не надо. Это на мой взгляд не красиво.
29 VladZ
 
04.10.12
08:12
(23) "это стандартное программирование" - при чем здесь это?
Открываешь букварь и читаешь, как в 1С работать со строками.
30 zak555
 
04.10.12
08:13
(22) формат отменили ?
31 Андрей_Андреич
 
naïve
04.10.12
08:15
А за "скриптовое 1С" - пожизненный бан.
Посмотрел недавно программу на С++ - ваще какой-то нерусь его придумал.
32 sashenka
 
04.10.12
08:16
(29) спасибо. думаю дальше дискутировать нет смысла по этому поводу. С уважением.
33 sashenka
 
04.10.12
08:17
(31) Если позволите, я не буду обсуждать эту тему. )
34 zak555
 
04.10.12
08:19
(31) ты прав, Страуструп --- не русский
wiki:C++
35 ADirks
 
04.10.12
08:25
(31) Вообще-то 1С - самый что ни на есть скриптовый язык, со всеми его атрибутами.
Возрыдай, адинэснег! Твой язык неполноценен!
36 Mikeware
 
04.10.12
08:27
(31) ога....
"Программиста спрашивают:
- Как вам удалось так быстро выучить английский язык?!!
- Та, ерунда какая. Они там почти все слова из С++ взяли."
©
37 Mikeware
 
04.10.12
08:28
(28) "тип данных структуры DBF" только подтверждает место ошибки...
38 Андрей_Андреич
 
naïve
04.10.12
08:29
(35) Ну попросишь ты у меня помощи на форуме :)
39 Mikeware
 
04.10.12
08:31
(38) ох,сомневаюсь.... ^-)
40 sashenka
 
04.10.12
08:32
(37) я все поправил уже) все нормально работает...
сейчас один кусочек еще допишу.. и все.. можно идти курить )
41 Мимохожий Однако
 
04.10.12
08:39
курить - здоровью вредить. Упал - отжался. И снова за комп )))
42 Эльниньо
 
04.10.12
11:08
(8) Когда я начинал программировать на Роботрон-1715 вообще никакой документации не было.
Всё методом тыка и мозолями на пятой точке.
43 Mikeware
 
04.10.12
11:30
(42) добывали все доступное.
реассемблировали все имеющееся (благо система команд была опубликована в ж.Радио) :-)
писали свое...
точка болела... глаза тоже уставали...