현 걸음마 부터 시작하는 단계라 부족한 부분이 많이 있습니다.
질문 답변 감사히 받겠습니다. (__) 꾸벅~

TServerSoket 관련 질문 올려 드립니다.
동적으로  3개의 soket을 생성 후 Client로 메모장에 포트가 제대로 열렸는지 확인을 해 보았습니다.

디버그 결과 :
//A  port에서는 원하는 8002번때로 제대로 들어옵니다. 허나..
//B  port에서도 A port 와 마찬가지로 8000번때가 나오는데.. 어째서..
7000번때가 나오지 않는것인지.. ㅠㅠ 많이 궁금합니다.
이를 7000번때로 나오게 하기 위한 저의 부족함이 무엇인지 조언 부탁드립니다.

//--------------------------------------------------------
    for(int i=0; i<3; i++){
        pvSock[i]  =   new TServerSocket(this);
        // A port
        if(i<3) {
            pvSock[i]->Tag = i;
            pvSock[i]->Port = 8001+i;
            pvSock[i]->OnClientRead = TCPClientRead;
            pvSock[i]->OnAccept = TCPOnAccept;
            pvSock[i]->OnClientConnect = TCPOnClientConnect;
            pvSock[i]->Active = true;
        }
        // B port
        else if( i==3){
            pvSock[i]->Tag = i;
            pvSock[i]->Port = 7001-3+i;  <== 포트만 열어주었습니다.
/*          
            pvSock[i]->OnClientRead = TCPClientRead;
            pvSock[i]->OnAccept = TCPOnAccept;
            pvSock[i]->OnClientConnect = TCPOnClientConnect;
            pvSock[i]->Active = true;
*?
        }
        //
        else {
         ......................................
//--------------------------------------------------------