1. ComPort에 Port라는 속성(AnsiString)이 있습니다.
"COM1" "COM11" 이런식으로 지정하시는 겁니다.

아래는 Port와 baud등 통신설정을 하는 예제입니다.

br110, dbFive등의 선언은 CPort.Hpp에 나와있습니다.

        TComPort *mComPort;

        mComPort = Sender;
        mComPort->Port = "COM1";

        // Baud Rate
        switch(EquipPort.BaudRate){
            case 110:        mComPort->BaudRate = br110; break;
            case 300:        mComPort->BaudRate = br300; break;
            case 600:        mComPort->BaudRate = br600; break;
            case 1200:        mComPort->BaudRate = br1200; break;
            case 2400:        mComPort->BaudRate = br2400; break;
            case 4800:        mComPort->BaudRate = br4800; break;
            case 9600:        mComPort->BaudRate = br9600; break;
            case 14400:        mComPort->BaudRate = br14400; break;
            case 19200:        mComPort->BaudRate = br19200; break;
            case 38400:        mComPort->BaudRate = br38400; break;
            case 56000:        mComPort->BaudRate = br56000; break;
            case 57600:        mComPort->BaudRate = br57600; break;
            case 115200:    mComPort->BaudRate = br115200; break;
            case 128000:    mComPort->BaudRate = br128000; break;
            case 256000:    mComPort->BaudRate = br256000; break;
            default:        mComPort->BaudRate = br9600; break;
        }
        // Data Bits
        switch(EquipPort.DataBits){
            case 5:            mComPort->DataBits = dbFive; break;
            case 6:            mComPort->DataBits = dbSix; break;
            case 7:            mComPort->DataBits = dbSeven; break;
            case 8:            mComPort->DataBits = dbEight; break;
            default:        mComPort->DataBits = dbEight; break;
        }
        // Stop Bits
        switch(EquipPort.StopBits){
            case 1:            mComPort->StopBits = sbOneStopBit; break;
            case 2:            mComPort->StopBits = sbTwoStopBits; break;
            default:          mComPort->StopBits = sbTwoStopBits; break;
        }
        // Parity
        switch(EquipPort.Parity){
            case 'N':        mComPort->Parity->Bits = prNone  ; break;
            case 'O':        mComPort->Parity->Bits = prOdd; break;
            case 'E':        mComPort->Parity->Bits = prEven; break;
            case 'M':        mComPort->Parity->Bits = prMark; break;
            case 'S':        mComPort->Parity->Bits = prSpace; break;
            default:         mComPort->Parity->Bits = prEven; break;
        }