Тема: Транслит
Показать сообщение отдельно
Старый 11.04.2016, 19:18   #14  
belugin is offline
belugin
Участник
Аватар для belugin
Сотрудники Microsoft Dynamics
Лучший по профессии 2017
Лучший по профессии 2015
Лучший по профессии 2014
Лучший по профессии 2011
Лучший по профессии 2009
 
4,228 / 2421 (89) +++++++++
Регистрация: 16.01.2004
Адрес: Москва
Так как все сравнения по умолчанию регистронезависимые можно не делать strLwr:

X++:
letter = strlwr(substr(value,i,1));
Чтобы сделать регистр, как мне кажется, достаточно добавить в конец что-то типа

X++:
str makeTheSameCase(str _letterToCompare, str _letterToConvert)
{
    return (strCmp(_letterToCompare, strUpr(_letterToCompare))==0)
       ? str2Capital( letterToConvert) : letterToConvert
}
...
ret += n>0 ? makeTheSameCase(letter, conpeek(lat,n)) : letter;
__________________
https://axcoder.github.io

Последний раз редактировалось belugin; 11.04.2016 в 20:42. Причина: str2capital
За это сообщение автора поблагодарили: Владимир Максимов (2), S.Kuskov (2).