Сокеты в Delphi 2009

[BOBAH13]

Причем тут кодировка вообще?

Смысл в том, что:

1. Существует строка S: String; мы ее шлем
2. Шлем как данные - Pointer(S)^ - это будет вам const buf; аргумент. Его размер = Length(S) * sizeof(widechar); ну или просто на 2. Но перед строкой благоразумно слать ее длину. Т.е. Integer = Length(S);
3. Аналогично и прием. Читаем Integer - пусть будет len: Integer;
Дальше SetString или SetLength или вообще PCHAR s = GetMem(); т.е. суть в том чтобы выделить память для хранения строки. Размер выделяемой памяти будет (len + 1) * sizeof(widechar); А потом в эту область памяти (аля String) читаем буфер.
Вот вы и транспортировали ваш Unicode String

Edit:
TzX - а как по вашему работает SendText ? Просто задумайтесь.

Edit:
Я лично, еще со времен Delphi 7 как только день провел с TClientSocket и т.п. из семейства, сразу плюнул и начал использовать блокирующие сокеты WinSock API. Очень стабильно, и ниразу не подводило.

[TzX]

Это если слать буфером. Зачит напрямую с текстом работать нельзя? Не оч хочется, выёживаться и слать простой текст, как данные. Но похоже выбора нет...

TzX - а как по вашему работает SendText ? Просто задумайтесь.

А зачем Велосипед изобретать? =)
Неужели никто так и не разобрался с сокетами и Rad Studio

Edit
И всё таки пришлось передавать и читать через буфер. Только вот не понятно зачем в сделаны сендтекст и ресив текст, если не возможно передавать и получать через них корректно в этой версии Delphi.

Тему можно закрыть