에러 메시지 내용 그대로 해석하면 됩니다.

처음 나오는 Undefined 어쩌구 나오는 에러는
TComPort 가 정의되지 않은것이니..
헤더 파일 Include 가 제대로 포함되지 않은것이고요
include 문제는 프로젝트 옵션의 Directories의 Include 리스트에 TComport 헤더가
있는 폴더가 제대로 추가되었는지 확인해 보세요
가장 흔한 문제이니까요..

그 아래에 나오는 MainForm->RSTCPClient->Connect(1000); 부분 에러는
메시지 그대로 Connect 함수에 필요없는 파라메타가 들어 있다는것이죠
아마 에러메시지로 보면 Connect함수는 Connect(void) 형 일거 같군요





이상준 님이 쓰신 글 :
: 이상준 님이 쓰신 글 :
: : 안녕하세요
: :  cport 추가하고  lib 하고 include 했는데 나오는 에러입니다
: :  그림 에러메세지 있읍니다
: :   아시는 분 알려주세요
: :  IP주소가 안맞아서 그런가요
: :
: :
: :   void __fastcall TMainForm::ComPort1RxChar(TObject *Sender, int Count)
: : {
: :     String gecChar;
: :     char *pCh;
: :     char  ch;
: :
: :     ComPort1->ReadStr(gecChar,Count);
: :     -------------------------------에러나는 부분
: :     pCh = gecChar.c_str();
: :
: :     for(int i=0 ; i<Count ; i++) {
: :         ch = pCh[i];
: :
: :         switch(ch) {
: :
: :             case '\r':
: :                 break;
: : --------------------------------------------------------------------------------------------
: :      ADOQuery1->ExecSQL();
: :         }
: :     Timer1->Enabled=false;
: :     Timer2->Enabled=false;
: :     Timer3->Enabled=false;
: :     Timer4->Enabled=false;
: :     Timer5->Enabled=false;
: :        
: :         frmConfirm->Close();
: :         rTransForm->Close();
: :         AutoTeachForm->Close();
: :
: :         ComPort1->Close();
: :         -----------------에러나는 부분
: :         delete YieldInfo;
: :
: :         MainForm->robotstop=true;
: :
: :         BCPTCPServer->Active=false;
: :         MainForm->Close();
: :     }
: : }
: : ----------------------------------------------------------------------------------------------
: :  BCPTCPClient->Port =BCP_CLIENT_PORT.ToInt();//9999; //blc
: :     BCPTCPClient->Host =BCP_CLIENT_HOST;//"12.98.70.168";
: :     BCPTCPClient->Disconnect();
: :
: :     BCPTCPServer->DefaultPort=BCP_SERVER_PORT.ToInt();//9998;//설비
: :     BCPTCPServer->Bindings->Add()->IP=BCP_SERVER_HOST;//"12.98.70.167";
: :     BCPTCPServer->Active=true;
: :     #endif
: :
: :     try{
: :             MainForm->RSTCPClient->Connect(1000);
: :             ---------------------------------------에러나는 부분
: :     }
: :     catch(Exception &e)
: :     {
: :            //ShowMessage("Timeout Happen");
: :            MessageBox(MainForm->Handle,"Timeout Happen.", "Look", MB_OK);
: :     }