Цитата:
|
Сообщение от UltraBloxX
Вообщем проблема решилась похоже. Дело было в том, что в ScktComp юните Delphi 2009 отправляется AnsiString, а принимается String (Юникод). Из-за этого приходили сообщения некорректно. Я взял ScktComp.pas, заменил в нём обьявления функции приёма текста и подложил его в папку клиенту и серверу. Уже проверил, клиент сообщил что тестовая команда получена.
|
Зачем так извращаться? Исходники редактировать?
Клиент
Код:
var test: String;
...
Socket.SendBuf(test, Length(test)*SizeOf(Char))
Сервер
Код:
var test: String;
...
Socket.ReceiveBuf(test, Socket.ReceiveLen());
* Имена функций по памяти написал
Сам на D2009 сижу, с сокетами работал - всё нормально было |