C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[12417] [답변&질문]신경써 주셔서 감사합니다.. 제 소스를.. 올렸어요.. ^^:;
빛나리 [] 782 읽음    2001-11-07 13:25
    socket_count++;
    AnsiString Send_Con_ID;
    AnsiString temp =  Socket->RemoteAddress;
    //사용하고있는 클라이언트 인지 조사해야함 ...
    for(int k=0;k<list_count;k++)
    {
      if(Socket->RemoteAddress == (Ilist[k]).iplist)
      {
         for(int i=0;i<total_list;i++)
         {
           if(temp == (Ilist[i]).iplist)
           {
             AnsiString tuid = (Ilist[i]).ID;
             AnsiString tip = (Ilist[i]).iplist;
             AnsiString duid;

             Q_User->Close();
             Q_User->SQL->Clear();
             Q_User->SQL->Add("SELECT * FROM Name_IP");
             Q_User->Open();
             Q_User->First();

             while(!(Q_User->Eof == true))
             {
               duid = Q_User->FieldByName("Name")->AsString;

               if( duid == tuid )
               {
                  if( tip == Q_User->FieldByName("IP")->AsString )
                  {
                    if((Ilist[i]).ID == "전지현")
                    {
                      Memo1->Lines->Add("사용중인 IP로 접속함");
                    }
                    else if((Ilist[i]).ID == "김민종")
                    {
                      Memo2->Lines->Add("사용중인 IP로 접속함");
                    }
                    else if((Ilist[i]).ID == "송혜교")
                    {
                      Memo3->Lines->Add("사용중인 IP로 접속함");
                    }
                    return;
                  }
                  else
                  {
                  }
               }
               Q_User->Next();
             }
           }
         }
         Socket->Close();
         break;
      }
    }
    //접속되어있는 접속자 리스트 전달
    for(int i=0;i<total_list;i++)
    {
      if((Ilist[i]).ID != "*")
      {
         Send_Con_ID = Send_Con_ID + (Ilist[i]).ID;
         Socket->SendText(Send_Con_ID);
      }
    }
    //초기 접속자 처리
    if(total_list == 0)
    {
      Socket->SendText("서버와 접속되었습니다.");
    }
    else
    {
      Socket->SendText(Send_Con_ID + " 접속되어 있습니다.");
    }

+ -

관련 글 리스트
12405 [질문]자꾸 에러가 나요.. 머리에 쥐나겠어요.. 빛나리 866 2001/11/07
12408     Re:[참고]혹시 이건아닌가요? 이종원 1181 2001/11/07
12411         Re:Re:[답변&질문]맞는거 같은데.. 빛나리 836 2001/11/07
12415             그러시면.. 이종원 765 2001/11/07
12417                 [답변&질문]신경써 주셔서 감사합니다.. 제 소스를.. 올렸어요.. ^^:; 빛나리 782 2001/11/07
12421                     Re:[자답]^^;;; 빛나리 875 2001/11/07
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.