Форум: "Основная";
Текущий архив: 2003.01.23;
Скачать: [xml.tar.bz2];

Вниз

Только первый символ нужно сделать UpCase   Найти похожие ветки 

← →
Supreme   (2003-01-13 14:25) [0]

Как в Edit2 поместить текст Edit1 в нижнем регистре, но чтобы первая буква была в верхнем регистре?

---

← →
Sergey Masloff   (2003-01-13 14:28) [1]

Ну сделай всей строке AnsiLowerCase() а первому символу AnsiUpperCase(). В чем проблема-то?

---

← →
dimich1978   (2003-01-13 15:18) [2]

Можно по другому...зная что string это все же массив и к нему можно обращаться напрмер s[i]=1 then ну и т.д. И используя вышеописанные фукнции без проблем.

---

← →
Supreme   (2003-01-13 16:05) [3]

А как именно узнать первый символ в Edit"e?

---

← →
gsu   (2003-01-13 16:06) [4]

edit1.text[1]

---

← →
Dmitriy2003   (2003-01-13 16:21) [5]

Edit2.Text := UpperCase(Edit1.Text) + LowerCase(Copy(Edit1.Text, 2, Length(Edit1.Text) - 1))

---

← →
gsu   (2003-01-13 16:28) [6]

>> Dmitriy2003
не похоже без 1 то

---

← →
Dmitriy2003   (2003-01-13 16:39) [7]

я имел в виду UpperCase(Edit1.Text[1]) + LowerCase(Copy(Edit1.Text, 2, Length(Edit1.Text) - 1))

---

← →
gsu   (2003-01-13 16:45) [8]

(-:|~

---

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

Форум: "Основная";
Текущий архив: 2003.01.23;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.009 c