Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Заглавные буквы в первом слове? / 6 сообщений из 6, страница 1 из 1
24.12.2002, 18:31
    #32083767
Cherruty
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заглавные буквы в первом слове?
Есть ли в Delphi функция перевода строки в строку с первыми буквами в словах заглавными? Как в Worde?
...
Рейтинг: 0 / 0
24.12.2002, 18:33
    #32083770
mahoune
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заглавные буквы в первом слове?
Код: plaintext
1.
2.
function UCaseFirst(inValue: string) {
  UCaseFirst:=Ucase(Left(inValue, 1 )) & right(inValue,len(inValue)- 1 );
}
...
Рейтинг: 0 / 0
24.12.2002, 18:40
    #32083772
Cherruty
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заглавные буквы в первом слове?
А разве стандартной никакой не имеется?
Что всю строку так перебирать
...
Рейтинг: 0 / 0
24.12.2002, 19:19
    #32083786
cyc10ne
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заглавные буквы в первом слове?
если мне не изменяет память то нет
собственно какая разница, если бы и была все равно оно бы в ней перебиралось (;
...
Рейтинг: 0 / 0
25.12.2002, 09:34
    #32083875
mahoune
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заглавные буквы в первом слове?
Если мне память не изменяет, то в Delphi можно со стринг работать вот так:
Код: plaintext
1.
MyVariable:= "весь текст в строчных символах" ;
MyVariable[ 1 ]=UCASE(MyVariable[ 1 ]);

C_НОВЫМ_ГОДОМ!!!
...
Рейтинг: 0 / 0
25.12.2002, 14:20
    #32084098
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заглавные буквы в первом слове?
А че так тупить - самому функцию не написать - че за тупизм?
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Заглавные буквы в первом слове? / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]