При запросе cs_get_channels_list возвращает sc_login.

Код: Выделить всё

   IdTCPClient1.Socket.WriteLn(MagicString + cs_get_channels_list + SendingFlags);

[Алексей Пикуров]

Сначала примите все сообщения с сервера, а потом уже делайте запросы.

Team lead
Чат со мной

Что я упускаю?
Ответы от сервера

Код: Выделить всё

800000{"ServPass":false,"ServName":"ILYA","UpdatePacketVer":"","UTC":4,"RelDate":"15.07.2014","ProtocolVer":"2.5","PortNode":80,
"PortHTTP":8083,"PortFTP":20000,"ServerVer":"5.6.0","Registered":"-",
"HelloMsg":"Welcome to -=MyChat=- Server\r\nCopyright (c) 2004-2013 by Alexey Pikurov
 \/ Network Software Solutions\r\nWWW: https:\/\/nsoft-s.com\r\nE-Mail: [email protected]\r\nSupport https:\/\/nsoft-s.com\/forum\r\nBlog: http:\/\/blog.nsoft-s.com","UpdatePacketSize":1,"YourIP":"192.168.1.5","HWID":"284979801_0_6-5-5-516875208","Free":false,"ForceUpdate":true,"CurrentDT":"21.08.2014.14.38.50.945"}

800200

801B00{"Days":0}

800400{"RightsSet":"1111111111111111111111111111111111111111111111
11010111101111001111001000011111111111","BlockedPlugins":[],"AllowedPlugins":[]}

800500{"Avatar":113,"UIN":2,"Sex":0,"AutoAwayTime":15,"InternalNick":"SV","Nick":"SV","LoginStyle":"login"}

[Алексей Пикуров]

Количество ответов может быть переменным, в зависимости от настроек сервера. Примите всё, потом, когда данных нет - начинайте отправлять команды свои.

Team lead
Чат со мной

Как узнать сколько ответов может послать сервер?

[Алексей Пикуров]

Никак, должен быть просто цикл приёма сообщений, вечный.

Team lead
Чат со мной

Хорошо так и сделал.