아.. 죄송합니다. 구글링 통해서 찾았습니당.. ㅠㅠ
검색 스킬이 저질이라.. 영어를 잘 모르다보니 대충 넘어갔던 문서가 답이었네요.

저처럼 영어 까막눈들을 위해 간단한 샘플 올려놓겠습니다.

TClientSocket은 OnLookup이벤트 때 소켓을 바인딩 한다고 합니다.
이 이벤트를 사용하여 바인드를 직업 하시면 TClientSocket에 자신이 원하는 포트를 입력할 수 있습니다.

void __fastcall TForm1::ClientSocket1Lookup(TObject *Sender, TCustomWinSocket *Socket)
{
    SOCKADDR_IN Addr;

    memset(&Addr, 0x00, sizeof(Addr));
    Addr.sin_family = AF_INET;
    Addr.sin_port = htons(10100);
    Addr.sin_addr.s_addr = inet_addr("192.168.1.40");

    int result = bind(Socket->SocketHandle, (SOCKADDR *)&Addr, sizeof(Addr));
    if(result == SOCKET_ERROR) {
        Logging->Lines->Add("소켓 바인드 에러");
    }
}
//---------------------------------------------------------------------------

영악한녀석  님이 쓰신 글 :
: 제목 그대로 입니다..
:
: TClientSocket의 LocalPort의 설정을 하려 하는데.. 어떻게 해야 하죠.. ?
:
: 보니까
:
: TClientSocket *sock = new TClientSocket(NULL);
: sock->Socket->LocalPort = 5600;
:
: 이렇게 하니까 접근금지 에러가 나더라고요.. 어떻게 설정 할 수 있는 방법 없을까요?