Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2016-08-29 07:20:06 ЛС | профиль | цитата
Нормальный возраст.
nesco, компонент StrCase. Я бы добавил вначале Trim(Str); Ну очень многие начинают печатать с Пробела (иногда с нескольких)
procedure THIStrCase.FirstChar;
begin
CharLower(@Str[1]);
CharUpperBuff(@Str[1], 1);
end;
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Редактировалось 2 раз(а), последний 2016-08-29 07:25:08