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

Вниз

Строки   Найти похожие ветки 

← →
MBo   (2002-02-26 08:07) [8]

так получилось или нет?
if length(edit1.text)>1 then
edit1.text:=ansiuppercase(copy(edit1.text,1,1))+
ansilowercase(copy(edit1.text,2,length(edit1.text)-1));

---

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

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

Наверх

Память: 0.43 MB
Время: 0.004 c