Программа для перевода величин

@Antoshka2003 · Регистрация: 07.05.2015

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

Доброго времени суток.
Нужно составить программу для перевода одной величины в другую.
Не могу доделать и исправить ошибки.
Вот сам код:

C++

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
 
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, wchar_t &Key)
{
if ((Key>='0' && Key<='9') || (Key==(char)8)) {}
  else Key=0;
}
 
//------SS---------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
double v1,v2;
int i1,i2;
if(Edit1->Text=="") //проверка если не заполнено поле едит1 то
{
    ShowMessage ("Введите исходную величину");
    return;
}
Form1->Edit2->Clear(); //
}
i1=Form->ComboBox1->ItemIndex;//
i2=Form->ComboBox2->ItemIndex;
v1=Form1->Edit1->Text.ToDouble();
 
switc (i1)
{
    case 0: v1=v2/0.0283495; break;
    case 1: v1=v1; break;
}
switch (i2)
{
    case 0;  v2=v1*0.0283495 break;
    case 1;  v2=v1; break;
  }
  Form1->Edit2->Text=FloatToStr(v2);
}
//---------------------------------------------------------------------------

Вот форма программы:
https://drive.google.com/file/... sp=sharing

Подскажите как можно проще сделать или улучшить?

@Famous_47 · 18.11.2015, 19:55

Какие ошибки выдает?

в 28-й строке нужно

C++

1	if (Edit1->Text.IsEmpty())

35, 36 строки почему Form, а не Form1?

39 строка switc вместо switch

переменные v1, v2, i1, i2 я бы объявил глобально

@Почтальон · 18.11.2015, 19:58

удалено мною

@Lelik-pahan · 19.11.2015, 09:16

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

переменные v1, v2, i1, i2 я бы объявил глобально

Зачем объявлять глобально переменные, которые используются только в одном методе?

@Famous_47 · 19.11.2015, 21:41

Lelik-pahan, я только посоветовал, вдруг потом понадобится... Интересно, что получилось, есть ошибки?

@Почтальон управление сложностью 1693 / 1306 / 259 Регистрация: 22.03.2015 Сообщений: 7,545 Записей в блоге: 5
	18.11.2015, 19:58	3
	удалено мною 0

@Lelik-pahan 1702 / 898 / 207 Регистрация: 25.11.2009 Сообщений: 1,847
	19.11.2015, 09:16	4
	Сообщение от Famous_47 переменные v1, v2, i1, i2 я бы объявил глобально Зачем объявлять глобально переменные, которые используются только в одном методе? 0

@Famous_47 1 / 1 / 1 Регистрация: 13.11.2015 Сообщений: 56
	19.11.2015, 21:41	5
	Lelik-pahan, я только посоветовал, вдруг потом понадобится... Интересно, что получилось, есть ошибки? 0