Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

String , Upper и Lower [D4, Win95/98]

mate © (2003-02-02 12:37:00)
Есть строка из нескольких слов разделённых пробелами, как сделать так , что бы если все слова написаны в верхнем регистре , то они (слова) стали бы написанны следующем образом: первая буква в верхнем регистре , а все остальные в нижнем.
Т.Е.
1.
если написано : ЛЁГКИЙ ВОПРОС
то должно быть: Лёгкий Вопрос
2.
если написано : ЛЁГКИЙ вопрос
то должно быть: Лёгкий вопрос
3.
если написано : Лёгкий вопрос
то должно всё остаться таким же

mrcat (2003-02-02 19:23:00) [1]
mate © (02.02.03 16:55)

Уважаемый!

Перед тем, как оскорблять - 101 раз подумай!

}{enon (2003-02-02 19:14:00) [2]
А в чём проблема-то?
Ведь сказано же - просматривай Ord всех символов. Или что-то не так?

Возмущенный Разум (2003-02-02 18:34:00) [3]
Удалено модератором

Song (2003-02-02 17:55:00) [4]
Ну раз я тормоз, делай сам.

mate (2003-02-02 16:55:00) [5]

>
> Song © (02.02.03 13:54)
> S:="ЛЁГКИЙ ВОПРОС";
> S:=AnsiUpperCase(s[1])+Copy(AnsiLowerCase(s),2,Length(S));;

Ну ты и то...з
У тебя получится > Лёгкий вопрос
А должно получиться > Лёгкий Вопрос

Song (2003-02-02 13:54:00) [6]
S:="ЛЁГКИЙ ВОПРОС";
S:=AnsiUpperCase(s[1])+Copy(AnsiLowerCase(s),2,Length(S));;

Макс1 (2003-02-02 13:47:00) [7]
А ты смотри ord всех символов. Там ведь по порядку отдельно символы верхнего и нижнего регистров.
Например: ord(а)=ord(А)+32.
224<=ord(а..я)<=255
192<=ord(А..Я)<=223

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »