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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 14.06.2009, 07:31   #1
Ekzot1k
Пользователь
 
Аватар для Ekzot1k
 
Регистрация: 13.06.2009
Сообщений: 21
По умолчанию Запретить ввод в Эдит русские символы.

Мне нужно чтобы в Edit вводилися одни Русские буквы, вкурсе что кд нужно вписывать в событие OnKeyPress и код примерно вот такой if not (Key in ['0'..'9', #8]) then Key := #0;, вот только проблема в том что буквы можно английские вводить, спасибо заранее
Ekzot1k вне форума Ответить с цитированием
Старый 14.06.2009, 07:46   #2
Манжосов Денис :)
Участник клуба
 
Регистрация: 29.01.2008
Сообщений: 1,039
По умолчанию

Код:
if not (Key in ['А'..'Я']) and not (Key in ['а'..'я']) then Key := #0;

Последний раз редактировалось Манжосов Денис :); 14.06.2009 в 07:54.
Манжосов Денис :) вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как запретить ввод всего алфавита и логических знаков "=+-*/" prikolist Общие вопросы C/C++ 13 02.06.2010 20:47
СИМВОЛЫ - помогите решить задачу на символы kiko Паскаль, Turbo Pascal, PascalABC.NET 5 30.11.2008 16:09
Косяки со вставкой в эдит joker Общие вопросы Delphi 1 14.09.2008 09:00
Как запретить/разрешить ввод от клавиатуры любых символов (в том числе и юникодных)? SkAndrew Общие вопросы Delphi 8 15.08.2008 15:30
Текущая дата в Эдит Ermiss Общие вопросы Delphi 4 22.12.2007 00:08