Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.05.2018, 13:35   #1
mr_xxx
Пользователь
 
Регистрация: 22.03.2012
Сообщений: 99
Вопрос Найти все строчные буквы и заменить на символ

Добрый день
есть строка
s:='AbcDEFghiJKLmnopqrStUvWXyzabcDe fghijkLmnopQrstuvwxyz';

нужно в s найти все строчные буквы и заменить на символ $
но при этом не трогать большие буквы

gрошу не давайте не каких советов где искать не советуйте искать в google и тд проста конеретно напишите как правильно все сделать

Заранее спасибо
mr_xxx вне форума Ответить с цитированием
Старый 26.05.2018, 14:37   #2
min@y™
Цифровой кот
Старожил
 
Аватар для min@y™
 
Регистрация: 29.08.2014
Сообщений: 7,656
По умолчанию

Код:
for idx:= 1 to s.Length do
  if s[idx] in ['a'..'z']
    then s[idx]:= '$';
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
min@y™ вне форума Ответить с цитированием
Старый 26.05.2018, 15:52   #3
mr_xxx
Пользователь
 
Регистрация: 22.03.2012
Сообщений: 99
По умолчанию

Цитата:
Сообщение от min@y™ Посмотреть сообщение
Код:
for idx:= 1 to s.Length do
  if s[idx] in ['a'..'z']
    then s[idx]:= '$';
Спасибо

но одна проблема
когда работаю с буквами əşğ
и строка типа TsSTəşğ
əşğ- эти буквы тоже определяет как заглавные буквы а не как строчные

if s[idx] in ['a','b','c','ç','d','e','ə','f','g' ,'ğ','h','x','ı','i','j','k','q','l ','m','n','o','ö','p','r','s','ş',' t','u','ü','v','y','z']

с другими буквами все ок именно с этими тримя

Последний раз редактировалось mr_xxx; 26.05.2018 в 15:58.
mr_xxx вне форума Ответить с цитированием
Старый 26.05.2018, 23:20   #4
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,534
По умолчанию

А что за язык подразумевается? Ни во французском, ни в испанском, ни в польском таких иероглифов нет. Латышский ? Румынский ? Древне-зулусский ?
digitalis вне форума Ответить с цитированием
Старый 26.05.2018, 23:24   #5
min@y™
Цифровой кот
Старожил
 
Аватар для min@y™
 
Регистрация: 29.08.2014
Сообщений: 7,656
По умолчанию

Цитата:
Сообщение от mr_xxx Посмотреть сообщение
но одна проблема
когда работаю с буквами əşğ
и строка типа TsSTəşğ
əşğ- эти буквы тоже определяет как заглавные буквы а не как строчные
Это не соответствует условию задачи:

Цитата:
Сообщение от mr_xxx Посмотреть сообщение
есть строка
s:='AbcDEFghiJKLmnopqrStUvWXyzabcDe fghijkLmnopQrstuvwxyz';
Чото я тут турецких букв не вижу.
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
min@y™ вне форума Ответить с цитированием
Старый 27.05.2018, 00:16   #6
mr_xxx
Пользователь
 
Регистрация: 22.03.2012
Сообщений: 99
По умолчанию

Цитата:
Сообщение от min@y™ Посмотреть сообщение
Это не соответствует условию задачи:


Чото я тут турецких букв не вижу.
в примере не было Турецких букв. Я думал что с ними не будет проблема. Но теперь именно с этими буквами проблема. Очень срочна нужно прошу помогите
mr_xxx вне форума Ответить с цитированием
Старый 27.05.2018, 00:17   #7
mr_xxx
Пользователь
 
Регистрация: 22.03.2012
Сообщений: 99
По умолчанию

Цитата:
Сообщение от digitalis Посмотреть сообщение
А что за язык подразумевается? Ни во французском, ни в испанском, ни в польском таких иероглифов нет. Латышский ? Румынский ? Древне-зулусский ?
Азербайджанский
mr_xxx вне форума Ответить с цитированием
Старый 27.05.2018, 01:18   #8
min@y™
Цифровой кот
Старожил
 
Аватар для min@y™
 
Регистрация: 29.08.2014
Сообщений: 7,656
По умолчанию

Цитата:
Сообщение от mr_xxx Посмотреть сообщение
в примере не было Турецких букв. Я думал что с ними не будет проблема. Но теперь именно с этими буквами проблема. Очень срочна нужно прошу помогите
ну так добавь их в множество и всё.
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
min@y™ вне форума Ответить с цитированием
Старый 27.05.2018, 01:57   #9
northener
ПШП
Участник клуба
 
Регистрация: 15.07.2013
Сообщений: 1,859
По умолчанию

Цитата:
Сообщение от min@y™ Посмотреть сообщение
ну так добавь их в множество и всё.
В какое множество?

Цитата:
Сообщение от mr_xxx Посмотреть сообщение
Азербайджанский
Версия Дельфи какая?
northener вне форума Ответить с цитированием
Старый 27.05.2018, 02:06   #10
Sciv
Старожил
 
Аватар для Sciv
 
Регистрация: 16.05.2012
Сообщений: 3,211
По умолчанию

Цитата:
Сообщение от northener Посмотреть сообщение
В какое множество?
это лол! По-Вашему, что вот это такое?

Код:
['a'..'z']
Я таки подозреваю, что вся проблема в точках с запятыми:

Код:
'ç ... ö ... ü'
Да и амперсанд в паскакале не нужон!
Начал решать проблему с помощью регулярных выражений. Теперь решаю две проблемы...

Последний раз редактировалось Sciv; 27.05.2018 в 02:09.
Sciv вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Заменить в файле все первые буквы в словах на заглавные буквы Luchfan12 Помощь студентам 6 15.10.2014 13:10
Преобразовать все строчные латинские буквы в прописные, а цифры заменить символом *. (Delphi) Dark Raven Помощь студентам 1 19.01.2012 14:53
напечатать все строчные русские гласные буквы Aimet Паскаль, Turbo Pascal, PascalABC.NET 0 16.06.2011 21:28
Заменить в строчные буквы aus Общие вопросы C/C++ 1 23.12.2010 16:46
все строчные буквы латинского алфавита заменить прописными. Саня7278 Общие вопросы C/C++ 5 20.05.2009 23:52