Ошибка при работе с com портом: "Не возможно открыть последовательный порт"

#pragma hdrstop
#include <windows.h>
#include "Unit1.h"
#include <conio.h>
#include <stdio.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   HANDLE port;
   DCB dcb;
   port=CreateFileA("COM10",GENERIC_READ|GENERIC_WRITE,0,NULL,OPEN_EXISTING,0,NULL);
   if(port==INVALID_HANDLE_VALUE) {
      Memo1->Lines->Add("Не возможно открыть последовательный порт");
      ExitProcess(1);
   }
   CloseHandle(port);
}

  int btn_num = 1;  // текущий номер кнопки выбора порта
  int port_num = 1;
  while ( port_num <= 256 )
   {
    AnsiString p1 = IntToStr ( port_num );
    char port_name [8] = "COM";
    strcat ( port_name, p1.c_str());
    hCom = OpenComm( port_name, baud1 );
    if( hCom != INVALID_HANDLE_VALUE )
     {
      CloseHandle( hCom );
      if( btn_num == 1 )// RadioButton1->Enabled == false )
       {
        RadioButton1->Enabled = true;
        RadioButton1->Checked = true;
        RadioButton1->Caption = port_name;
       }
      if( btn_num == 2 )// RadioButton2->Enabled == false )
       {
        RadioButton2->Enabled = true;
        RadioButton2->Caption = port_name;
       }
      if( btn_num == 3 )// RadioButton3->Enabled == false )
       {
        RadioButton3->Enabled = true;
        RadioButton3->Caption = port_name;
       }
      if( btn_num == 4 )// RadioButton4->Enabled == false )
       {
        RadioButton4->Enabled = true;
        RadioButton4->Caption = port_name;
       }
      btn_num ++;
     }
     if( btn_num > 4 ) break;
     port_num ++;
   }

  int btn_num = 1;  // òåêóùèé íîìåð êíîïêè âûáîðà ïîðòà
  int port_num = 1; // òåêóùèé íîìåð îïðàøèâàåìîãî ïîðòà
  while ( port_num <= 256 )
   {
    AnsiString p1 = IntToStr ( port_num );
    AnsiString port_name = "\\\\.\\COM";
    port_name += p1;
    //strcat ( port_name, p1.c_str());
    hCom = OpenComm( port_name.c_str(), baud1 );
    if( hCom != INVALID_HANDLE_VALUE )
     {
      CloseHandle( hCom );
      if( btn_num == 1 )// RadioButton1->Enabled == false )
       {
        RadioButton1->Enabled = true;
        RadioButton1->Checked = true;
        RadioButton1->Caption = port_name.SubString(5, 7);
       }
      if( btn_num == 2 )// RadioButton2->Enabled == false )
       {
        RadioButton2->Enabled = true;
        RadioButton2->Caption = port_name.SubString(5, 7);
       }
      if( btn_num == 3 )// RadioButton3->Enabled == false )
       {
        RadioButton3->Enabled = true;
        RadioButton3->Caption = port_name.SubString(5, 7);
       }
      if( btn_num == 4 )// RadioButton4->Enabled == false )
       {
        RadioButton4->Enabled = true;
        RadioButton4->Caption = port_name.SubString(5, 7);
       }
      btn_num ++;
     }
     if( btn_num > 4 ) break;
     port_num ++;
   }

AnsiString str = "a1", str2 = "b2";
 
char *pdata = (char*)str.data(); // Берем прям самые сырые данные
 
int length = str.Length(); 
 
if( *(pdata + length) == '\0' )
  ShowMessage( "Пустой символ в конце есть." );
 
//ShowMessage( (int)*(pdata + length) );