POST запрос, перевод из char[] в строку

bool POST()
{
  HINTERNET hInternet = ::InternetOpen(TEXT("Opera"), INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);   
  if (hInternet != NULL)
  {
      HINTERNET hConnect = ::InternetConnect(hInternet,TEXT("site.com"),INTERNET_DEFAULT_HTTP_PORT,NULL,NULL,INTERNET_SERVICE_HTTP,0,1u);
      static TCHAR type[] = TEXT("Content-Type: application/x-www-form-urlencoded");
      char profil[1024];
      strcpy(profil,"log=login&pas=password");
 
      if (hConnect != NULL) 
      {
          HINTERNET hRequest = ::HttpOpenRequest(hConnect,TEXT("POST"),TEXT("login.php"),NULL,NULL,0,INTERNET_FLAG_KEEP_CONNECTION,1);
          if (hRequest != NULL)
          {
             BOOL bSend = ::HttpSendRequest(hRequest, type, -1L, profil, strlen(profil));
             if (bSend)
             {
                 for (;;)
                 {          
                     char  Data[1024];
                     DWORD dwBytesRead;
                     BOOL bRead = ::InternetReadFile(hRequest,Data,sizeof(Data)-1,&dwBytesRead);        
                     if (bRead == FALSE  ||  dwBytesRead == 0)
                         break;
                     
                     textBox1->Text = Data[0].ToString();                                   
                 }
             }
             ::InternetCloseHandle(hRequest);
          }
          ::InternetCloseHandle(hConnect);
      }
      ::InternetCloseHandle(hInternet);
  }
return 0;
}

 Data[dwBytesRead] = 0; 
textBox1->Text = String(Data); // Или просто Data

textBox1->Text = gcnew String(Data);

cin>>Data;
for (int i=0;i<1024;i++)
{
     if(Data[i]==textBox1->Text)
     {
     MessageBox::Show("1");
     }
}