ComPort1->Port = "COM1"; 이런식으로 직접 지정하면 error 입니다.
ComPort1->ShowSetupDialog(); 를 이용하셨다고 하셨는데요.
이거 사용하면 Port 번호 변경 가능합니다.

다른 방법으로는 래지스트리에서 Port 번호 읽어오게 할 수 있습니다.
ComPort1->LoadSettings(stRegistry, "HKEY_CURRENT_USER\\MyComSetting")
이용합니다.
MyComSetting 밑에 컴포트 이름과 동일한 이름으로 KEY가 존재해야합니다 "ComPort1"
ComPort1 Key 의 Value로 BaudRate, DataBits, FlowControl, Parity, Port, StopBits 등을 둡니다.
모두 "문자열 값"입니다.

쌩조 님이 쓰신 글 :
: Comport를 이용해서 통신 포트를 조저하고 싶은데 PC와 아래의 ComPort1->Port="COM1"의 포트가 일치하지 않으면 에러가 발생합니다.
:     ComPort1->ShowSetupDialog(); 를 이용해서 포트를 재설정 해도 동작이 하지 않습니다.
: 이거 아무리 해도 정해진 Port가 아니면 Setup창에서 변경 해줘도 적용이 안되네요. 그냥 사용가능 포트만 보여주는 방식인가요?>>
: 혹시 Cport에서 Port설정 방법 아시면 도움좀 부탁드립니다.
:

: void __fastcall TWMain::DefaultComPortSet()
: {
:     ComPort1->Port= "COM1";
:     ComPort1->BaudRate = br9600;
:
:     ComPort1->TriggersOnRxChar = true;
:     ComPort1->Parity->Bits = prNone;
:     ComPort1->StopBits = sbOneStopBit;
:     ComPort1->Connected = true;
:     ComPort1->Open();
:
:     if (ComPort1->Connected)
:     {
:         Connect_ComPort = true;
:
:     } else {
:         Connect_ComPort = false;
:     }
: }

: 이는 현재 기본 통신 포트설정입니다.