Delphi - Tclientsocket и Tserversocket мульти-сессии для коннекта к Серверу ?

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by Voland-791, 3 Nov 2010.

  1. Voland-791

    Voland-791 Member

    Joined:
    1 May 2009
    Messages:
    163
    Likes Received:
    13
    Reputations:
    5
    Delphi - Tclientsocket и Tserversocket мульти-сессия для коннекта к Серверу ?

    Столкнулся с такой проблемой:
    При попытке подключиться с больше 2-3 клиентов (ClientSocket) к Серверу (ServerSocket ),выдает мессагу с ошибкой, а если с одного клиента коннектиться на сервер то все ок. я не уже совсем не новичек в делфи.
    Как реализовать мульти сессию (множественные подключения) со стороны клиентов к серверу? в возможностью отсылать команды клиентам? Гуглил результатов почти никаких нет,может есть какието обновления.. Каким образам можно решить эту проблему?

    Допустим открываю порт Сервака на прослушку:


    Коннект для клиента:

    Коннектиться может только первый клиент,а при попытке подключить 2 посылает на х/й.




    Проблему решил,тема закрыта.
     
    #1 Voland-791, 3 Nov 2010
    Last edited: 18 Nov 2010
    2 people like this.
  2. UNAT

    UNAT New Member

    Joined:
    22 Aug 2009
    Messages:
    26
    Likes Received:
    2
    Reputations:
    2
    Помнится мне сервер при событии OnClientConnect создает для каждого клиента отдельный сокет, а если при этом работать с server.socket то будет такая ошибка. Посмотри параметры, принимаемые процедурами обработки подключений, там должен быть отдельный сокет для каждого клиента.
     
  3. alexey-m

    alexey-m Elder - Старейшина

    Joined:
    15 Jul 2009
    Messages:
    518
    Likes Received:
    100
    Reputations:
    37
    Voland-791 очень простой пример сервера и клиента с использованием TServerSocket и TClientSocket src и bin