Ввод в поле только букв

@Sasha · Регистрация: 05.06.2008

Студворк — интернет-сервис помощи студентам

Здравствуйте!

Подскажите, по такому вопросу как сделать, чтобы в эдит можно было вводить только буквы, а не цифры.

Заранее благодарен

@MegaAce · 19.12.2010, 21:21

C++
1
2
3
char v=Key;
 if !((int(v)<48)||(int(v)>57))
  Edit1->Text += v;

@MikeSoft · 19.12.2010, 21:21

Sasha, введите в поиск по форуму: "цифры в Edit".
Выберите понравившееся вам решение (их на форуме уже как грязи)
А затем, подстройте условие под своё...

Например,

C++
1
2
3
4
5
if ((Key >= '0') && (Key <= '9')) {
  // только цифры
} else {
  // все остальные символы
}

@Persk · 13.01.2011, 02:32

Держи, только здесь запрет ввода букв, переделай

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//---------------------------------------------------------------------------
 
void __fastcall TPagesDlg::Edit5KeyPress(TObject *Sender, char &Key)
{// Запрет ввода букв в Edit5 (Рост)
if ((Key >= '0') && (Key <= '9')) {} // цифры
else if (Key == 8) {} // <-
else if ((Key == '.') || (Key == ',')) // запятая
{
if (((TEdit*)Sender)->Text.Pos(DecimalSeparator)!=0) // если запятая уже есть
Key = 0;
else // если ещё нет
Key = DecimalSeparator;
}
else Key = 0; // не цифра 
if (Key == 0)//Вывод сообщения, попытка была попытка ввода не цифр
ShowMessage("В данное поле возможен ввод только цифр");
}
//---------------------------------------------------------------------------

@|< E |\| |\| Y · 14.01.2011, 16:40

Можно использовать компонент MaskEdit с маской "I" - либо буква, либо ничего.

@AlexSt · 14.01.2011, 16:52

Сообщение от MikeSoft

Sasha, введите в поиск по форуму: "цифры в Edit".
Выберите понравившееся вам решение (их на форуме уже как грязи)
А затем, подстройте условие под своё...

Блин помойму есть на cyberguru.ru 70% всех подобных вопросов. море мануала

Новые блоги и статьи Все статьи Все блоги /
К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3

	Ввод в поле только букв 19.12.2010, 21:13. Показов 7865. Ответов 5 Метки нет (Все метки) Здравствуйте! Подскажите, по такому вопросу как сделать, чтобы в эдит можно было вводить только буквы, а не цифры. Заранее благодарен 0

@\|< E \|\\| \|\\| Y 2 / 1 / 1 Регистрация: 06.01.2011 Сообщений: 3
	14.01.2011, 16:40
	Можно использовать компонент MaskEdit с маской "I" - либо буква, либо ничего. 1