|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.10.2016, 22:57 | #1 |
Регистрация: 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(); } |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Переписать код с С++ на С# | 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 |