HTML+JAVA или C++: что мне лучше использовать?

int __fastcall TfmMain::Initialize(){
//Получаем директорию для временных файлов - можно заменить на
//системную директорию.
 TmpDir =  ExtractFilePath(ParamStr(0))+"tmp\\";
 TRegistry *Reg = new TRegistry;
//Считываем параметры реестра - в твоем случае в этом необходимости нет
//вполне достаточно получить информацию о компьютере которая тебе
//действительно необходима - например список сетевых интерфейсов
//информацию о необходимых настройках - например инфу о названии файла
//БД, необходимых сервисах, и пр. можно хранить в XML-файле в папке программы
 
RegPath = "SOFTWARE\\MalKonSW\\nOTC\\settings";

//Отсутствует ветвь реестра
 if(!Reg->KeyExists(RegPath)) return 1;
 Reg->OpenKey(RegPath,false);
 Reg->WriteDate("paramis",Now());
 if(!Reg->ValueExists("dbpathnew")) return 2;
 PathDataBase = Reg->ReadString("dbpathnew");
 Servertmp = Reg->ReadString("Server");

 Provider = Reg->ReadString("Provider");
 Station = Reg->ReadInteger("station");
 Address = Reg->ReadString("address");
 Phone = Reg->ReadString("phone");

 Reg->CloseKey();
 RegPath = "SOFTWARE\\MalKonSW\\nOTC\\ftp";
 Reg->OpenKey(RegPath,false);
 FTPAddress = Reg->ReadString("address");
 FTPUser =  Reg->ReadString("user");
 FTPPass = Reg->ReadString("pass");
 FTPInDir = Reg->ReadString("in");
 FTPOutDir = Reg->ReadString("out");
 InDir =  ExtractFileDir(ParamStr(0))+"in\\";
 //Получаем имя компьютера
 char buffer[512];
  DWORD size = 512;
   GetComputerName(buffer,&size);
   dmMain= new TdmMain(this);
  TfmLogin *login = new TfmLogin(NULL);
try{
   login->ShowModal();
  if(login->ModalResult!=mrOk){
   delete dmMain;
   dmMain = NULL;
    Application->Terminate();
   return 2;
  }
SUser = login->edName->Text;
Pass = login->edPass->Text;

//Формируем строки подключения - у меня в данной версии использовалось
//две строки подключения. Зачем - хз. Не помню. :)
 WideString Connect = "Provider="+WideString(Provider)+";Password="+WideString(Pass)+";Persist Security Info=True;User ID="+WideString(SUser)+";Data Source="+WideString(Server)+";Extended Properties=\"AttachDBFileName="+WideString(PathDataBase)+"\";Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID="+WideString(buffer)+";Use Encryption for Data=False;Tag with column collation when possible=False;MARS Connection=False;DataTypeCompatibility=0;Trust Server Certificate=False";
 ConnectForClient = "Provider="+WideString(Provider)+";Password="+WideString(Pass)+";Persist Security Info=True;User ID="+WideString(SUser)+";Data Source="+WideString(Server)+";Initial Catalog="+WideString(PathDataBase)+";Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID="+WideString(buffer)+";Use Encryption for Data=False;Tag with column collation when possible=False;MARS Connection=False;DataTypeCompatibility=0;Trust Server Certificate=False";
//Дальше идет обработка начальной инфы - тут пишешь свое  - то что нужно тебе.
if(dmMain->adoConnect->Connected)dmMain->adoConnect->Connected = false;
 dmMain->adoConnect->ConnectionString = Connect;
 try{
 dmMain->adoConnect->Connected = true;
 dmMain->adoGetUserId->ExecProc();
 User = dmMain->adoGetUserId->Parameters->ParamByName("@userid")->Value;
 }
 catch(EOleException *exception)
    {
     //ShowMessage(exception->Message);
     //delete fmLogin;
     delete dmMain;
     dmMain = NULL;

     return 2;
    }
    cbSchema->AddItem("Все записи",(TObject*)new int(-1));
    dmMain->adoLoadSprcredit->Active=true;
    dmMain->adoLoadSprcredit->First();
    while(!dmMain->adoLoadSprcredit->Eof)
    {
     AnsiString s=dmMain->adoLoadSprcredit->FieldByName("creditname")->AsString;
     int wsh=dmMain->adoLoadSprcredit->FieldByName("creditid")->AsInteger;
     cbSchema->AddItem(s,(TObject*)new int(wsh));
     dmMain->adoLoadSprcredit->Next();
    }
    dmMain->adoLoadSprcredit->Active=false;
    cbSchema->ItemIndex=0;
 }
 __finally{
  delete login;
  login = NULL;
  delete Reg;
  Reg = NULL;
  }
 return 0;
 }