Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 05.11.2009, 21:23   #1
Evgenii
Форумчанин
 
Аватар для Evgenii
 
Регистрация: 04.01.2008
Сообщений: 201
По умолчанию преобразование маленькой буквы в заглавную-?

В TEdit вводится некоторое слово. Можно ли как-то организовать чтобы первая буква этого слова автоматически становилась заглавной, как-будто мы при этом нажали shift?
Например вводим имя виктор без шифта, а буква в автоматически преобразуется в В, получается Виктор
Evgenii вне форума
Старый 05.11.2009, 21:25   #2
Вавел из ГМТУ
Форумчанин
 
Регистрация: 19.06.2009
Сообщений: 896
По умолчанию

AnsiUpperCase(Edit1.Text[1]);
Вавел из ГМТУ вне форума
Старый 05.11.2009, 21:31   #3
Evgenii
Форумчанин
 
Аватар для Evgenii
 
Регистрация: 04.01.2008
Сообщений: 201
По умолчанию

а что такое Text[1]? я имею ввиду почему в квадратных скобках стоит именно единица а не какое-то другое число?
Evgenii вне форума
Старый 05.11.2009, 21:40   #4
Вавел из ГМТУ
Форумчанин
 
Регистрация: 19.06.2009
Сообщений: 896
По умолчанию

AnsiUpperCase - функция которая маленькую букву превращает в большую (грубо говоря).
Edit1.Text[1] - обращение к первой букве строки, которая содержиться в текстовом поле.


Поэксперементируй:
AnsiUpperCase(Edit1.Text[1]);
AnsiUpperCase(Edit1.Text[4]);
AnsiUpperCase(Edit1.Text);
AnsiUpperCase(Edit1.Text[2]);
Вавел из ГМТУ вне форума
Старый 05.11.2009, 21:43   #5
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

То Evgenii
173(!) поста уже... И такая элементарщина...
Может, пора уже и книжку по Дельфи прочитать?
mihali4 вне форума
Старый 05.11.2009, 21:44   #6
Evgenii
Форумчанин
 
Аватар для Evgenii
 
Регистрация: 04.01.2008
Сообщений: 201
По умолчанию

а в какое событие записывается эта строка? Пишу в OnKeyPress, ничего не работает, например со строкой AnsiUpperCase(Edit1.Text); или программа вообще выскакивает со строкой AnsiUpperCase(Edit1.Text[1]);
Evgenii вне форума
Старый 05.11.2009, 21:48   #7
Вавел из ГМТУ
Форумчанин
 
Регистрация: 19.06.2009
Сообщений: 896
По умолчанию

Ябы его засунул в обработчик ОнЧаиндж текстового поля.

адд: действительно. 173 поста и в голове пусто ) Читай книжки там, практики побольше.

Последний раз редактировалось Вавел из ГМТУ; 05.11.2009 в 21:54.
Вавел из ГМТУ вне форума
Старый 05.11.2009, 21:56   #8
Evgenii
Форумчанин
 
Аватар для Evgenii
 
Регистрация: 04.01.2008
Сообщений: 201
По умолчанию

в OnChange программа вообще при запуске вылетает(
Evgenii вне форума
Старый 05.11.2009, 22:06   #9
Вавел из ГМТУ
Форумчанин
 
Регистрация: 19.06.2009
Сообщений: 896
По умолчанию

Я неумею работать с абстрактным словом "вылетает" и пр.
Оно должно чтото сообщать, выводить сообщения, подсказки и пр.
Ктомуже кода нет....
Вавел из ГМТУ вне форума
Старый 06.11.2009, 06:41   #10
Rabbit
Пользователь
 
Аватар для Rabbit
 
Регистрация: 12.01.2008
Сообщений: 12
По умолчанию

Сделай проверку на наличие в строке текста
Код:
if Length(Edit1.Text) <> 0 then
  AnsiUpperCase(Edit1.Text[1]);
Цитата:
ничего не работает, например со строкой AnsiUpperCase(Edit1.Text);
Функция AnsiUpperCase(S: Char) работает для одного символа, а ты передаешь в нее целую строку
Rabbit вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Автоматически изменять первую букву в слове на заглавную для Microsoft Office Excel. agregator Microsoft Office Excel 17 24.02.2012 10:56
Заменить автоматически первую букву в ячейке на заглавную. agregator Microsoft Office Excel 2 02.07.2009 18:22
Помогите с написанием маленькой проги Nightprince Помощь студентам 6 16.01.2009 00:08
Не могу нарисовать блок-схему маленькой программы prikolist Паскаль, Turbo Pascal, PascalABC.NET 4 25.11.2008 23:40
Написать на маленькой кнопке SAndrus Microsoft Office Excel 5 15.07.2007 23:59