7387       Конференция Delphi SoobCha           письмо # 7388 7389  

Тема: Re: В Memo вводить только БОЛЬШИЕ буквы
Дата: Wed, 09 Apr 2008 01:17:01 +0900
Кому: "Delphi" <Delphi@soobcha.org>
X-Mailer: Becky! ver. 2.44 [ru]
Content-Type: text/plain; charset="koi8-r"
     Приветствую, Зобов Алексей Григорьевич!
Во вторник, 8 апреля 2008 г. Вы написали:

З> Коллеги, подскажите как пользователю запретить в Memo вводить маленькие буквы, а разрешить ТОЛЬКО большие.
З> Главное чтобы это работало и с Copy+Paste.
    i := GetWindowLong(Memo1.Handle, GWL_STYLE);
    SetWindowLong(Memo1.Handle, GWL_STYLE, i or ES_UPPERCASE);
Реагирует на все (в том числе и на Copy/Paste) за одним исключением: не
изменяется то, что было до выполнения этого кода.


--
Vovan-VE - Visible Efficiency
http://vovan-ve.fatal.ru/
  7387 7389  
 
???Mail.ru ??? ?????
╘ 2000-2006 Сообщество Чайников