Карта сайтаСсылкиКонтакты

Преобразование первой буквы Edit в заглавную

PDF Печать
Статьи

Когда пользователи вводят данные, часто они должны их форматировать нужным способом. Чтобы не зависеть от пользователя, Вы должны заставить программу сделать эту работу.

Например, если пользователь напечатает имя прописными буквами, программа должна автоматически преобразовать первую букву имени или фамилии в заглавную.

Добавьте следующий код в событие OnKeyPress компонента Edit1:


with Sender as TEdit do
    if (SelStart = 0) or 
       (Text[SelStart] = ' ') then
          if Key in ['a'..'z'] then 
             Key := UpCase(Key) ;

Теперь программа будет сама преобразовывать первую букву каждого введенного слова в заглавную.

Примечание: Функция UpCase переводит символ в верхний регистр (только латинский).


 

Комментарии   

 
0 #1 Evan 28.07.2016 19:24
Wonderful! So simple. Thanks for the info, super helpful. Filling out forms is super easy with
PDFfiller. Try it on your own here form and you'll
make sure how it's simple. |Useful analysis,

Feel free to visit my web blog website; Evan: http://ads.kanarenmarkt.de/ads/ferienhaus-auf-teneriffa-villa-antonio/,
Цитировать
 

Добавить комментарий


Защитный код
Обновить