Отсылаю текст, доходят Иероглифы (Сокеты)

[KoBRaAndrey]

Отсылаю текст командой:
ServerSocket1.Socket.SendText('Тест ');
Доходят иероглифы непонятные Как исправить?

[Replicant]

Сообщение от KoBRaAndrey

Отсылаю текст командой:
ServerSocket1.Socket.SendText('Тест ');
Доходят иероглифы непонятные Как исправить?

Отправка:
procedure TForm1.ButtonSendMSG(Sender: TObject);
var s: string;
i:integer;
begin
s := Edit1.Text;
ClientSocket1.Socket.SendText(s); //отправка с клиента
ServerSocket1.Socket.Connections[i].SendText(s); //отправка с сервера
end;

Получение:
procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
var s: string;
begin
s := Socket.ReceiveText;
end;

Работает 100%

[KoBRaAndrey]

спасибо, пашет

[Lifefine]

Сделал все как написано, все ровно появляются иероглифы

[ArtGrek]

создаите новую тему и покажите как, тоесть код