Калькулятор

@Admiral174 · Регистрация: 15.05.2019

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

Возможно ли в билдере в границах одного edit простые операции( -+/*) над двумя числами ? Например если написать в edit 2+2, то он это будет заменять на 4.Такая же концепция как в excel Таблице.

@nick42 · 28.05.2019, 20:17

В простейшем случае да с одной операцией - нет ничего сложного__

C++
1
2
3
4
5
6
7
8
9
10
11
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//     #include <fstream.h>
     int A, B;  char zn;
     sscanf(Edit1->Text.c_str(),"%d%c%d",&A,&zn,&B);
     switch (zn) {
      case '+': Edit1->Text = IntToStr(A+B); break;
      case '-': Edit1->Text = IntToStr(A-B); break;
       /* . . . */
     }
}

Вот пример на сложение и вычитание (прочее аналогично).

@volvo · 28.05.2019, 22:05

Для 32-битных приложений (а если BCB6 - то других и не предвидится) можно и более сложные примеры решать: Создание объекта MSScriptControl.ScriptControl

@nick42 · 28.05.2019, 22:18

volvo, волшебно! Я, честно говоря, и не ожидал, что так просто всё

C++
1
2
3
4
5
6
7
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    Variant sc = CreateOleObject("MSScriptControl.ScriptControl");
    sc.OlePropertySet("Language",WideString("JScript"));
    this->Caption = sc.OleFunction("Eval", WideString(Edit1->Text));
    sc = Unassigned;
}

@Admiral174 · 30.05.2019, 14:14 **[ТС]**

Спасибо за вашу помощь , ваши советы очень помогли .

Добавлено через 2 часа 13 минут
Возникла проблема при компиляции кода в Rad studio 10.2, хотя на 6 версии борланда все работало.
Ругается на char , замена на wchar_t не помогла.Как быть с такой проблемой?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
void __fastcall TForm1::Edit2Exit(TObject *Sender)
{
 int A, B;
     char zn;
     sscanf(Edit2->Text.c_str(),"%d%c%d",&A,&zn,&B);
 
      if(zn=='+')
      {
      Edit2->Text = IntToStr(A+B);
      }
      if(zn=='-')
      {
      Edit2->Text = IntToStr(A-B);
      }
      if(zn=='/')
      {
      Edit2->Text = IntToStr(A/B);
      }
      if(zn=='*')
      {
      Edit2->Text = IntToStr(A*B);
      }
     if((zn!='-')&&(zn!='+')&&(zn!='*')&&(zn!='/'))
      Edit2->Text = IntToStr(A);
StringGrid1->Cells[X][Y]=Edit2->Text;

@volvo · 30.05.2019, 14:32

В Юникодных Билдерах - так:

C++
1
     swscanf(Edit2->Text.c_str(),L"%d%c%d",&A,&zn,&B);

, больше ничего менять не нужно.

P.S.
А еще лучше - добавить в самом начале

C++
1
#include <tchar.h>

, и переписать проблемную строку вот так:

C++
1
_stscanf(Edit2->Text.c_str(), _T("%d%c%d"),&A,&zn,&B);

, тогда не придется вообще ничего переделывать при переходе с одной версии Билдера на другую; код будет работать как в BCB6, так и в самых новых версиях Билдера.

@Admiral174 · 30.05.2019, 20:09 **[ТС]**

Спасибо вам, все заработало.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	Установка Emscripten SDK (emsdk) и CMake на Windows для сборки C и C++ приложений в WebAssembly (Wasm) 8Observer8 30.01.2026 Чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. Система контроля версиями Git. . .	Подключение Box2D v3 к SDL3 для Android: физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .

@Admiral174 0 / 0 / 0 Регистрация: 15.05.2019 Сообщений: 7

	Builder 6 Калькулятор 28.05.2019, 19:27. Показов 738. Ответов 6 Метки нет (Все метки) Возможно ли в билдере в границах одного edit простые операции( -+/*) над двумя числами ? Например если написать в edit 2+2, то он это будет заменять на 4.Такая же концепция как в excel Таблице. 0

@volvo Супер-модератор 33376 / 21500 / 8236 Регистрация: 22.10.2011 Сообщений: 36,896 Записей в блоге: 11
	28.05.2019, 22:05
	Для 32-битных приложений (а если BCB6 - то других и не предвидится) можно и более сложные примеры решать: Создание объекта MSScriptControl.ScriptControl 4

@Admiral174 0 / 0 / 0 Регистрация: 15.05.2019 Сообщений: 7
	30.05.2019, 20:09 [ТС]
	Спасибо вам, все заработало. 0