| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Только первый символ нужно сделать UpCase
Supreme © (2003-01-13 14:25:00)Как в Edit2 поместить текст Edit1 в нижнем регистре, но чтобы первая буква была в верхнем регистре?
gsu (2003-01-13 16:45:00) [1](-:|~
Dmitriy2003 (2003-01-13 16:39:00) [2]я имел в виду UpperCase(Edit1.Text[1]) + LowerCase(Copy(Edit1.Text, 2, Length(Edit1.Text) - 1))
gsu (2003-01-13 16:28:00) [3]>> Dmitriy2003
не похоже без 1 то
Dmitriy2003 (2003-01-13 16:21:00) [4]Edit2.Text := UpperCase(Edit1.Text) + LowerCase(Copy(Edit1.Text, 2, Length(Edit1.Text) - 1))
gsu (2003-01-13 16:06:00) [5]edit1.text[1]
Supreme (2003-01-13 16:05:00) [6]А как именно узнать первый символ в Edit"e?
dimich1978 (2003-01-13 15:18:00) [7]Можно по другому...зная что string это все же массив и к нему можно обращаться напрмер s[i]=1 then ну и т.д. И используя вышеописанные фукнции без проблем.
Sergey Masloff (2003-01-13 14:28:00) [8]Ну сделай всей строке AnsiLowerCase() а первому символу AnsiUpperCase(). В чем проблема-то?
| |
