Выполнять действие при вводе определенных символов в Edit

@Alex_From_777 · Регистрация: 22.04.2015

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

Здравствуйте.
Суть вопроса вот в чем:
При написании калькулятора, хочется что бы нажатие клавиши "+" программа воспринимала это как необходимость произведения операции сложения, и не вписывала символ в поле ввода цифр (TEdit).
На форме имеется кнопка, которая выполняет так же сложение. Вот обработка клика по ней.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Попытка избавиться от символа +
    String stroka;
    int sym;
    stroka=Edit1->Text;
    sym=stroka.Pos("+");
    stroka.Delete(sym, 1);
    Edit1->Text=stroka;
//Способ не работает, т.к. символ вписывается уже после обработки данного события
if (Edit1->Text=="") ShowMessage("!!!Введите значение!!!");
else
{
  a=StrToFloat(Edit1->Text);
  op=1;//переменная, отвечающая за тип операции
  Edit1->Text="0";
  Edit1->SetFocus();
  Label1->Caption=FloatToStr(a)+"+";
}

Далее при нажатии =

C++
1
2
3
4
5
if (op==1)
  {
    otvet=a+b;
    Label1->Caption=Label1->Caption+FloatToStr(b)+"="+FloatToStr(otvet);
  }

C++
1
2
3
4
5
6
7
8
9
void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if (Key==VK_RETURN)      Form1->Button5->Click();
  if (Key==VK_ADD)           Form1->Button1->Click();
  if (Key==VK_SUBTRACT)   Form1->Button2->Click();
  if (Key==VK_DIVIDE)       Form1->Button4->Click();
  if (Key==VK_MULTIPLY)    Form1->Button3->Click();
}

Но по нажатии на + на клавиатуре вписывается так же сам символ. Как можно этого избежать?
Всем кто поможет, заранее спасибо.

@Почтальон · 29.03.2016, 13:12

Сразу же удалить этот символ из строки?
Помнится давали кусок кода, в котором не вводился неправильно набранный символ, если терпит до вечера, гляну

@Alex_From_777 · 29.03.2016, 13:27 **[ТС]**

Сообщение от Почтальон

Сразу же удалить этот символ из строки?
Помнится давали кусок кода, в котором не вводился неправильно набранный символ, если терпит до вечера, гляну

Ну да, сразу или что бы вообще не появлялся. Это не так принципиально. А по времени очень даже терпит.

@Почтальон · 29.03.2016, 13:38

А если вот так делать:

C++
1
2
3
4
5
6
7
8
9
10
if (Key==VK_ADD)
{
String stroka;
int sym;
stroka=Edit1->Text;
sym=stroka.Pos("+");
stroka.Delete(sym, 1);
Edit1->Text=stroka;
Form1->Button1->Click();
}

Но помнится мне, вроде есть более изящное решение есть. Давайте гуру подождем

@Alex_From_777 · 29.03.2016, 13:49 **[ТС]**

Сообщение от Почтальон

А если вот так делать:

Так то же не работает. И все по той же причине. Если выполнять пошагово, то вначале выполняются все строки кода, и лишь последним действием вписывается символ +.

@nick42 · 29.03.2016, 14:39

Alex_From_777, попробуй на другое событие (Edit1->KeyPress)__

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{ 
  if (Key==0x2B) { Key=NULL; Form1->Button1->Click(); }
  if (Key==0x2D) { Key=NULL; Form1->Button2->Click(); }  
  if (Key==0x2A) { Key=NULL; Form1->Button3->Click(); }
  if (Key==0x2F) { Key=NULL; Form1->Button4->Click(); }
  if (Key==0x0D) { Key=NULL; Form1->Button5->Click(); }         
}

@Почтальон · 29.03.2016, 14:50

Дааа, тоже сначала в голову стрельнуло: Почему именно при нажатии клавиши FormKeyDown

@Alex_From_777 · 30.03.2016, 09:04 **[ТС]**

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

Alex_From_777, попробуй на другое событие (Edit1->KeyPress)__

Спасибо, способ действительно хороший и действующий, но, почему-то метод Edit1->SetFocus(); перестал работать.

Добавлено через 1 минуту

Сообщение от Почтальон

Дааа, тоже сначала в голову стрельнуло: Почему именно при нажатии клавиши FormKeyDown

Потому что до сего момента не приходилось использовать Edit1->KeyPress и не посмотрел, какие события есть у эдита.

@nick42 · 30.03.2016, 09:49

Если поле для ввода единственное (Edit1), то можно для формы определить в Инспекторе тот же обработчик OnKeyPress, что и для эдита, и вначале его добавить Edit1->SetFocus(); . У меня так работает.

@Alex_From_777 · 30.03.2016, 11:44 **[ТС]**

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

У меня так работает.

Если я правильно понял, то такой способ имелся в виду:

C++
1
2
3
4
5
6
7
8
9
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{
  Edit1->SetFocus();
  if (Key==0x2B) { Key=NULL; Form1->Button1->Click(); }
  if (Key==0x2D) { Key=NULL; Form1->Button2->Click(); }
  if (Key==0x2A) { Key=NULL; Form1->Button3->Click(); }
  if (Key==0x2F) { Key=NULL; Form1->Button4->Click(); }
  if (Key==0x0D) {Key=NULL;  Form1->Button5->Click();}
}

и:

Выполнять действие при вводе определенных символов в Edit

@nick42 · 30.03.2016, 17:07

Совершенно верно.

Добавлено через 4 часа 59 минут
Если на форме кроме эдита есть компоненты, способные перехватить фокус, то лучше так__

C++
1
2
3
4
5
6
7
8
  if (Key==0x2B) { Key=NULL; Form1->Button1->Click(); }
  if (Key==0x2D) { Key=NULL; Form1->Button2->Click(); }  
  if (Key==0x2A) { Key=NULL; Form1->Button3->Click(); }
  if (Key==0x2F) { Key=NULL; Form1->Button4->Click(); }
  if (Key==0x0D) { Key=NULL; Form1->Button5->Click(); } 
   if (!Edit1->Focused()) Edit1->Text = Edit1->Text+Key;  
   Edit1->SetFocus();
   Edit1->SelStart = Edit1->Text.Length();

и их свойство OnKeyPress тоже подключить к эдиту.

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

@Почтальон управление сложностью 1693 / 1306 / 259 Регистрация: 22.03.2015 Сообщений: 7,545 Записей в блоге: 5
	29.03.2016, 13:12
	Сразу же удалить этот символ из строки? Помнится давали кусок кода, в котором не вводился неправильно набранный символ, если терпит до вечера, гляну 1

@Почтальон управление сложностью 1693 / 1306 / 259 Регистрация: 22.03.2015 Сообщений: 7,545 Записей в блоге: 5
	29.03.2016, 14:50
	Дааа, тоже сначала в голову стрельнуло: Почему именно при нажатии клавиши FormKeyDown 1

@nick42 Практикантроп 4841 / 2726 / 534 Регистрация: 23.09.2011 Сообщений: 5,798
	30.03.2016, 09:49
	Если поле для ввода единственное (Edit1), то можно для формы определить в Инспекторе тот же обработчик OnKeyPress, что и для эдита, и вначале его добавить Edit1->SetFocus(); . У меня так работает. 0

Выполнять действие при вводе определенных символов в Edit

Решение