Реклама на этом месте
Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
15 Дек 2017, 09:44
МультиВход
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
 
collapse

Автор Тема: Как изменить прописные буквы в строчные?  (Прочитано 13527 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн hort

  • *
  • Сообщений: 9
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2011-07-17
  • Сайт: 
  • Профессия: Ученик 1С
Здравствуйте!
Скажите пожалуйста, есть ли в 1С какие-либо стандартные способы изменить регистр букв? Есть готовый справочник, но в нём все буквы прописные. Данные из справочника должны выводиться на печать. Можно, конечно, так и оставить, но хочется сделать красиво, А НЕ ТАК.
Единственное, что вижу пока - написать процедуру и один раз поменять все буквы в справочнике, типа если буква равна "А", то заменить её на "а", исключая первые буквы. Но, может быть, уже есть решение?
Заранее спасибо.
С уважением, Владимир.


Оффлайн sergejK74

  • *****
  • Сообщений: 1093
  • РЕПУТАЦИЯ: 458
  • КПД: 42%
  • Всегда готов помочь!
  • Регистрация: 2011-07-08
  • Сайт: 
  • Профессия: Ученик 1С
Напиши свою функцию, которая будет возвращать наименование в нужном регистре.
Простейший пример не требующий наверное комментариев
Функция НормализоватьНаименование(Слово) 
Результат = "";
Слово = СокрЛП(Слово);
ДлинаСлова =СтрДлина(Слово);
Результат = Врег(Лев(Слово,1))+Нрег(Прав(Слово,ДлинаСлова-1));
Возврат Результат;
КонецФункции

Наименование = " QWERTY ЙЦУКЕН";
Сообщить(НормализоватьНаименование(Наименование));
// Результат = Qwerty йцукен
Сделай на ее примере свою.
Кнопочка Спасибо - слева!

Оффлайн hort

  • *
  • Сообщений: 9
  • РЕПУТАЦИЯ: 0
  • Регистрация: 2011-07-17
  • Сайт: 
  • Профессия: Ученик 1С
Напиши свою функцию, которая будет возвращать наименование в нужном регистре.
Простейший пример не требующий наверное комментариев
Функция НормализоватьНаименование(Слово) 
Результат = "";
Слово = СокрЛП(Слово);
ДлинаСлова =СтрДлина(Слово);
Результат = Врег(Лев(Слово,1))+Нрег(Прав(Слово,ДлинаСлова-1));
Возврат Результат;
КонецФункции

Наименование = " QWERTY ЙЦУКЕН";
Сообщить(НормализоватьНаименование(Наименование));
// Результат = Qwerty йцукен
Сделай на ее примере свою.
Вот, Нрег и Врег, то, что нужно! Большое спасибо за подробный пример!
Надо не лениться мануалы читать...  :nhsrm:


Теги:
 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Реклама

* Последние вакансии

* Топ 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
177 Сообщений
ilyay ilyay
69 Сообщений
oleg-x
48 Сообщений
AIFrame
45 Сообщений
alex0402
44 Сообщений
andron81_81
38 Сообщений
MuI_I_Ika MuI_I_Ika
33 Сообщений
Golickoff Golickoff
31 Сообщений
BuhRust
30 Сообщений
Dima Dddd Dima Dddd
26 Сообщений

* Кто онлайн

* Облако тэгов

* Форум 1С с мобильного

* Инструменты

* Дополнительно

Поиск

 
SimplePortal 2.3.5 © 2008-2012, SimplePortal