Проблема! Нужна помощь! Кто знаком с С++ - сюда)

[KLON07]

А купить нормальный логарифмический калькулятор что слабо !?

[KLON07]

Ищи здесь fr.newestsoft.com как найдешь юзай поиск для взломанной программы !

[kristiano]

мне нужен именно 16 ричный. И не купленый, а созданый.


include <vcl.h>
#pragma hdrstop
#include <math.h>
#include "Unit1.h"
#include "p16to10.h" // ---- функция перевода из 16й в 10ю систему
#include "cor_func.h" // ---- функция проверки правильность значений
//#include "cor_func_main.h" ---- начало определения ошибки введеных данных
//#include "incor_mes.h" ---- вывод сообщения об ошибке
//#include "p10to16.h" ---- функция перевода из 10й в 16ю систему
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------


void __fastcall TForm1::Button1Click(TObject *Sender)
{
#include "cor_func_main.h" //см. описание в начале
int a,b,c;

if(RadioButton1->Checked 1) { a=StrToInt(Edit1->Text);};


if(RadioButton2->Checked 1) //якщо перше число в 16 системі
{String a16;
a16 = Edit1->Text;
a = func16to10(a16); // вызов функции перевода из 8ю в 10ю систему
}

if (RadioButton3->Checked 1) {b = StrToInt(Edit2->Text);}


if(RadioButton4->Checked 1) //якщо друге число в 16й системі
{String b16;
b16 = Edit2->Text;
b = func16to10(b16); // вызов функции перевода из 16й в 10ю систему
}

c=a+b;//<<---- выполняем действие в 10й системе
#include "p10to16.h"
//-----Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Label1->Caption = "Incorrect";};} //если число введенно некоректно //
//-----/\Если введено неправильное число------------------------------------//

//---------------------------------------------------------------------------

void __fastcall TForm1::Button5Click(TObject *Sender)
{
int a = StrToInt(Edit1->Text);
int b = StrToInt(Edit2->Text);
int i,p;

if ((RadioButton3->Checked) 1) {i=1;} else {i=0;};
if ((RadioButton4->Checked) 1) {p=1;} else {p=0;};

if ((RadioButton1->Checked) 1)
{RadioButton3->Checked = 1;
RadioButton1->Checked = i;
RadioButton2->Checked = p;} else {

if ((RadioButton2->Checked) 1)
{RadioButton4->Checked = 1;
RadioButton1->Checked = i;
RadioButton2->Checked = p;};}

Edit2->Text = IntToStr(a);
Edit1->Text = IntToStr(b);

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
#include "cor_func_main.h" //см. описание в начале
int a,b,c;

if(RadioButton1->Checked 1) { a=StrToInt(Edit1->Text);};


if(RadioButton2->Checked 1) //якщо перше число в 16 системі
{String a16;
a16 = Edit1->Text;
a = func16to10(a16); // вызов функции перевода из 8ю в 10ю систему
}

if (RadioButton3->Checked 1) {b = StrToInt(Edit2->Text);}


if(RadioButton4->Checked 1) //якщо друге число в 16й системі
{String b16;
b16 = Edit2->Text;
b = func16to10(b16); // вызов функции перевода из 16й в 10ю систему
}

c=a*b;//<<---- выполняем действие в 10й системе
#include "p10to16.h"
//-----Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Label1->Caption = "Incorrect";};} //если число введенно некоректно //
//-----/\Если введено неправильное число------------------------------------//

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton1Click(TObject *Sender)
{//---------------------------------------------------------------//
String edit1txt = Edit1->Text; //
int syst = 16; //
if (corfunc(edit1txt,syst) 1) { //если число введено корректно//
//----------------- ---то начинаем вычисления---------------------//
int a;
String a16;
a16 = Edit1->Text;
a = func16to10(a16); // вызов функции перевода из 16ю в 10ю систему
Edit1->Text = IntToStr(a);
//-----Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Edit1->Text = "0"; //если число введенно некоректно //
#include "incor_mes.h" //--- вывод сообщение об ошибке //
//-----/\Если введено неправильное число------------------------------------//
};}
//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton2Click(TObject *Sender)
{//---------------------------------------------------------------//
String edit1txt = Edit1->Text; //
int syst = 10; //
if (corfunc(edit1txt,syst) 1) { //если число введено корректно//
//----------------- ---то начинаем вычисления---------------------//
int c = StrToInt(Edit1->Text);
#include "p10to16RBa.h"
//};//---Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Edit1->Text = "0"; //если число введенно некоректно //
#include "incor_mes.h" //--- вывод сообщение об ошибке //
//-----/\Если введено неправильное число------------------------------------//
};}
//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton3Click(TObject *Sender)
{//---------------------------------------------------------------//
String edit2txt = Edit2->Text; //
int syst = 16; //
if (corfunc(edit2txt,syst) 1) { //если число введено корректно//
//----------------- ---то начинаем вычисления---------------------//
int b;
String b16;
b16 = Edit2->Text;
b = func16to10(b16); // вызов функции перевода из 16ю в 10ю систему
Edit2->Text = IntToStr(b);
//-----Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Edit2->Text = "0"; //если число введенно некоректно //
#include "incor_mes.h" //--- вывод сообщение об ошибке //
//-----/\Если введено неправильное число------------------------------------//
};}
//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton4Click(TObject *Sender)
{//---------------------------------------------------------------//
String edit2txt = Edit2->Text; //
int syst = 10; //
if (corfunc(edit2txt,syst) 1) { //если число введено корректно//
//----------------- ---то начинаем вычисления---------------------//
int c = StrToInt(Edit2->Text);
#include "p10to16RBb.h"
};//---Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Edit2->Text = "0"; //если число введенно некоректно //
#include "incor_mes.h" //--- вывод сообщение об ошибке //
};}//--/\Если введено неправильное число------------------------------------//
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
#include "cor_func_main.h" //см. описание в начале
int a,b,c;

if(RadioButton1->Checked 1) { a=StrToInt(Edit1->Text);};


if(RadioButton2->Checked 1) //якщо перше число в 16 системі
{String a16;
a16 = Edit1->Text;
a = func16to10(a16); // вызов функции перевода из 8ю в 10ю систему
}

if (RadioButton3->Checked 1) {b = StrToInt(Edit2->Text);}


if(RadioButton4->Checked 1) //якщо друге число в 16й системі
{String b16;
b16 = Edit2->Text;
b = func16to10(b16); // вызов функции перевода из 16й в 10ю систему
}

c=a-b;//<<---- выполняем действие в 10й системе
#include "p10to16.h"
//-----Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Label1->Caption = "Incorrect";};} //если число введенно некоректно //
//-----/\Если введено неправильное число------------------------------------//

//---------------------------------------------------------------------------

void __fastcall TForm1::Button4Click(TObject *Sender)
{
#include "cor_func_main.h" //см. описание в начале
int a,b,c;

if(RadioButton1->Checked 1) { a=StrToInt(Edit1->Text);};


if(RadioButton2->Checked 1) //якщо перше число в 16 системі
{String a16;
a16 = Edit1->Text;
a = func16to10(a16); // вызов функции перевода из 16ю в 10ю систему
}

if (RadioButton3->Checked 1) {b = StrToInt(Edit2->Text);}


if(RadioButton4->Checked 1) //якщо друге число в 16й системі
{String b16;
b16 = Edit2->Text;
b = func16to10(b16); // вызов функции перевода из 16ю в 10ю систему
}

if (b0) {Label1->Caption = "Деление на 0!";} else {
// /\если мы делим на 0
c=a/b;//<<---- выполняем действие в 10й системе
#include "p10to16.h"
}; //end IF b!=0
//-----Вышеперечисленные действия исполнялись есть введеное число правильное//
} //<--Коец условия //
else {Label1->Caption = "Incorrect";};} //если число введенно некоректно //
//-----/\Если введено неправильное число------------------------------------//

//---------------------------------------------------------------------------

void __fastcall TForm1::Button7Click(TObject *Sender)
{
Form1->Close();
}
//---------------------------------------------------------------------------


void __fastcall TForm1::RadioButton5Click(TObject *Sender)
{int c;
String c16;
c16 = Label1->Caption;
c = func16to10(c16); // вызов функции перевода из 16ю в 10ю систему
Label1->Caption = IntToStr(c);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton6Click(TObject *Sender)
{int c; c = StrToInt(Label1->Caption);
if (c>7) {
#include "p10to16Lab.h"
};};}
//---------------------------------------------------------------------------


void __fastcall TForm1::Button8Click(TObject *Sender)
{
Edit1->Text = "0";
Edit2->Text = "0";
Label1->Caption = "0";
RadioButton1->Checked = 1;
RadioButton3->Checked = 1;
RadioButton5->Checked = 1;
}
//---------------------------------------------------------------------------

[kristiano]

Если нужно могу скинуть саму программу.