Вниз
Скачать: CL | DM;

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]

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


 
}{enon ©   (2003-02-02 19:14) [6]

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


 
mrcat ©   (2003-02-02 19:23) [7]

mate © (02.02.03 16:55)

Уважаемый!

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.017 c
3-28609
Ihtiandr
2003-01-20 17:58
2003.02.10
clientdataset1.ApplyUpdates(-1);


1-28694
koly01
2003-01-29 15:02
2003.02.10
помогите разобраться с Tservice


7-29123
Burjua
2002-12-06 11:41
2003.02.10
Как ловить синхроимпульсы от видеокарточкм


1-28906
Nick_N_A
2003-01-26 05:23
2003.02.10
Icons & File


1-28767
olookin
2003-01-31 17:35
2003.02.10
из Delphi в Excel




   Наверх