String , Upper и Lower

← →
mate © (2003-02-02 12:37) [0]

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

← →
Макс1 (2003-02-02 13:47) [1]

А ты смотри ord всех символов. Там ведь по порядку отдельно символы верхнего и нижнего регистров.
Например: ord(а)=ord(А)+32.
224<=ord(а..я)<=255
192<=ord(А..Я)<=223

← →
Song © (2003-02-02 13:54) [2]

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

← →
mate © (2003-02-02 16:55) [3]

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

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

← →
Song © (2003-02-02 17:55) [4]

Ну раз я тормоз, делай сам.

← →
Возмущенный Разум (2003-02-02 18:34) [5]

Удалено модератором

А в чём проблема-то?
Ведь сказано же - просматривай Ord всех символов. Или что-то не так?

String , Upper и Lower Найти похожие ветки