Проверка на палиндром в 1С 8.3 #731058

Приветствую! Сделал проверку на палиндром наименования в номенклатуре, но выдает ошибку {Справочник.Номенклатура.Форма.ФормаЭлемента.Форма(1019)}: Получение элемента по индексу для значения не определено &НаКлиенте В чем косяк, подскажите, пожалуйста)

ТекНаим - это строка. Какой же там может быть индекс?

Тогда как исправить? Посимвольно можно же работать со строками в 1С. Думал сработает) в с++ точно сработает такой алгоритм)

кури Сред

тебе уже проще засунуть строку в массив на входе

В "Сред" заработало) правда строка "арозаупаланалапуазора" не является палиндромом Оо )) Косякнул в условии что ли..

СокрЛП в начале используй, а то слева первый символ будет "а", а справа - пробел, вот и не сойдется.

Отладчик показывает именно "арозаупаланалапуазора", т.е. без пробелов, но при этом результат все равно "не является".

Ну ты даешь! Что в слове содержится в отладчике ты посмотрел, молодец. А посмотреть, в какой момент он на строку "Палиндром = Ложь;" попадает - это уже неспортивно?

Посмотрел где) но после того как написал сюда) Спасибо за помощь! Буду разбираться))

Просто интересно, какую задачу решаете таким образом?

Проверить на полиндром значение поля "Наименование"

вообще правильнее так:

Проверь последовательность нуклеотидов в дезоксирибонуклеиновой кислоте на палиндромы,скачать можно сдесь

Повышаем градус! =)     Возврат Фраза = "" Или (Лев(Фраза, 1) = Прав(Фраза, 1) И ЭтоПалиндром( Сред(Фраза, 2, СтрДлина(Фраза) - 2))); КонецФункции

Повышать, так повышать: Возврат ОбщийМодульЛингвистическихФункций.ЭтоПалиндром(Фраза);

Это понятно. Практический смысл какой?

Тема курсовой.. А смысла практического нет) Баловство)

как думаешь, при какой длине строки выпадет твой ник?

Ну тогда вот так =) Функция ЭтоПалиндром(Фраза)     Возврат КодВозвратаДиалога.Да = Вопрос("Фраза """ + Фраза + """ является палиндромом?", РежимДиалогаВопрос.ДаНет); КонецФункции

Тогда вопрос поставлю по-другому: как грамотно написать условие: ну и соответственно последний уменьшается на 1 в цикле

В общем, сравнение первого символа и последнего в цикле, причем будет первый+1, последний-1

зачем эти сложности? реверс строки и сравнение с оригиналом гораздо гораздее

Тьфу. Если Сред(ТекНаим, Начало, 1) <>  Сред(ТекНаим, Конец 1) Тогда Кончено же

ну, если говорить о загрузке, то посимвольное сравнение с начала и конца быстрее произойдет, нежели взять строку, реверснуть и сравнить обе) правда это доли секунды) просто когда искал материал по работе со строками в 1с наткнулся на этот пример, решил попробовать) но там написано простыми словами, а не кодом) Спасибо, Записьдампа) я пытался сделать также, только не единицы ставил, а длину строки)

Хотя отбой, даже слово "трепет" при твоем условии сочло палиндромом)

Я ведь ща 1С запущу =) Функция ЭтоПалиндром(ТекНаим)

В качестве списка литературы к курсовой синтаксис-помощник 1С будешь указывать? =)

&НаКлиенте результат: "трепет" - палиндром) просто я в карточке номенклатуры сделал кнопку на командной панели и привязал к процедуре

обойдемся без списка литературы :D

ТекНаим откуда берется?

тьфу блин))) видать удалил случайно вместе с комментом и оставил не ту строку XD