Q&A

  • 인디서버에서 메세지 보내는 방밥?
안녕하세요
기본 소켓을 쓰다가 이번에 인디로 바꿀생각입니다.
그래서 테스트 중인데요
서버에서 클라이언트로 메세지를 어케 보내죠
예제에서는 클라인언트에서 메세지를 받은후에 메세지처리하는것은 있는데
서버에서 현재 연결된 클라인언트로 데이타를 보내는 방법좀 갈켜 주세요
(클라인언트에서 아무 데이타도 받지 않은상태에서요)
기본소켓에서는
  ServerSocket1.Socket.Connections[I].SendText('ABC');
이렇게 사용했는데....
아시는분 답변 부탁드립니다.
이 게시물을
1  COMMENTS
  • Profile
    최용일 • 2002.05.15 04:58
    안녕하세요. 최용일입니다.

    TIdTCPServer에 보시면 Threads란 속성이 있습니다. 이걸 쓰세요...

    procedure Form1.Broadcast;
    var
        Index: Integer;
        List: TList;
        Thread: TIdPeerThread;
    begin
        if (Threads = nil) then
            Exit;
        try
            List := IdTCPServer1.Threads.LockList;
            for Index := 0 to List.Count - 1 do
            begin
                Thread := TIdPeerThread(List.Items[Index]);
                if (Thread <> nil) then
                begin

                    // 여기에서 원하시는 작업을 하세요...
                    Thread.Connection.WriteLn(.........);

                end;
            end;
        finally
            IdTCPServer1.Threads.UnlockList;
        end;
    end;

    ^^ 항상 즐코하세요...
←First Page
1019 1020 1021 1022 1023 1024 1025 1026 1027 1028
Last Page→
한델 로그인 하기