Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.02.20;
Скачать: CL | DM;

Вниз

Принудительная раскладка языка   Найти похожие ветки 

 
ghostdelvonte@mail.ru   (2010-11-25 17:09) [0]

Здравствуйте! У меня такое дело: скажите, как запретить в поле редактирования английский\русский языки? (К примеру при выборе перключателя, чтобы язык был или русский или английский)... заранее благодарен!


 
Юрий Зотов ©   (2010-11-25 17:23) [1]

Что-то вроде этого (без учета цифр и других небуквенных знаков):

procedure Tform1.Edit1KeyPress(Sender: TObject, Key: Char);
begin
 if CheckBox1.Checked <> (Key in ["a".."z", "A".."Z"]) then
   Key := #0
end


 
DiamondShark ©   (2010-11-25 19:48) [2]

ActivateKeyboardLayout


 
Leonid Troyanovsky ©   (2010-11-26 08:20) [3]


> ghostdelvonte@mail.ru   (25.11.10 17:09)  

> в поле редактирования английский\русский языки?

http://www.delphimaster.net/view/2-1192164282

--
Regards, LVT.



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

Текущий архив: 2011.02.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
2-1290760671
Scott Storch
2010-11-26 11:37
2011.02.20
out- параметр интерфейс


15-1288631685
Tema
2010-11-01 20:14
2011.02.20
Как зарегистрироваться на Embarcadero?


2-1290639541
Германн
2010-11-25 01:59
2011.02.20
Типизированные константы


2-1291131119
Василич
2010-11-30 18:31
2011.02.20
Вопрос по TWordApplication.


15-1289338193
Юрий
2010-11-10 00:29
2011.02.20
С днем рождения ! 10 ноября 2010 среда