Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C/C++ программирование > Общие вопросы C/C++
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.10.2016, 22:57   #1
MartinLucas
 
Регистрация: 27.10.2016
Сообщений: 3
По умолчанию переписать код с С++ на JAVA

Здравствуйте!!! Помогите Пожалуйста переписать код с С++ на JAVA:

Листинг 1 (С++)
#ifndef UnitH
#define UnitH
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <Vcl.Buttons.hpp>
#include <Vcl.ComCtrls.hpp>
#include <Vcl.Mask.hpp>
#include <Vcl.ExtCtrls.hpp>

class TForm1 : public TForm
{
__published:
TButton *Button1;
TButton *Button2;
TButton *Button3;
TEdit *Edit1;
TEdit *Edit2;
TEdit *Edit3;
TEdit *Edit4;
TEdit *Edit5;
TEdit *Edit6;
TLabel *Label1;
TLabel *Label2;
TLabel *Label5;
void __fastcall Button1Click(TObject *Sender);
void __fastcall Button2Click(TObject *Sender);
void __fastcall Button3Click(TObject *Sender);
private:
public:
__fastcall TForm1(TComponent* Owner);
};
extern PACKAGE TForm1 *Form1;
#endif
//-----------------------------
#include <vcl.h>
#pragma hdrstop
#include <time.h>
#include "Unit.h"
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int t1,t2;
clock_t start, finish;

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

void __fastcall TForm1::Button1Click(TObject *Sender)
{
start = clock();
AnsiString tocode;
int T,n;
tocode=Edit1->Text;
n=Edit4->Text.ToInt();
for (int i = 1;i<=tocode.Length();i++)
{
T = ((unsigned char)tocode[i] + n);
if (T >= 256) T=T-255;
tocode[i] = (char) T;
}
Edit2->Text = tocode;
finish = clock();
t1 = (finish - start) / CLOCKS_PER_SEC;
Edit5 -> Text = t1;
}

void __fastcall TForm1::Button2Click(TObject *Sender)
{
start = clock();
AnsiString todecode;
int T,n;
todecode=Edit2->Text;
n=Edit4->Text.ToInt();
for (int i=1;i<=todecode.Length();i++)
{
T =( (unsigned char)todecode[i] - n);
if (T <= 1) T=T+255;
todecode[i] = (char) T;
}
Edit3->Text = todecode;
finish = clock();
t2 = (finish - start) / CLOCKS_PER_SEC;
Edit6 -> Text = t2;
}

void __fastcall TForm1::Button3Click(TObject *Sender)
{
Edit1->Clear();
Edit2->Clear();
Edit3->Clear();
Edit4->Clear();
Edit5->Clear();
Edit6->Clear();
}
MartinLucas вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Переписать код с С++ на С# Annuffka Помощь студентам 0 18.10.2015 21:24
Переписать приложение Delphi на Java zakaso Общие вопросы по Java, Java SE, Kotlin 1 20.02.2015 15:54
Переписать код Вадим12091965 Microsoft Office Excel 0 24.09.2013 19:44
переписать код на паскаль hunter03 Паскаль, Turbo Pascal, PascalABC.NET 0 13.12.2010 15:46
Код игры на Паскале и на Делфи сильно отличается? Как переписать код с Паскаля в Делфи? Mclaren Помощь студентам 2 27.04.2009 22:37