От клиента до сервер (socket)(посылаем text)

[zotox]

Собственно есть строка каторая вписана в клиент программу и надо от клиента послать серву эту строку... то есть чтобы еще сервер записал эту строку (каторую посылаем) в свой Edit1.Text....

Спасибо!

[Terran]

Procedure TForm1.Button1Click(Sender: TObject);
Begin
ClientSocket1.Socket.SendText('111');
End;

-----------------

Procedure TForm1.ServerSocket1ClientRead(Sender: TObject;
Socket: TCustomWinSocket);
Begin
Edit1.Text:=Socket.ReceiveText;
End;

[zotox]

Procedure TForm1.Button1Click(Sender: TObject);
Begin
ClientSocket1.Socket.SendText('111');
End;

Ругаеться и пишет что

"Too many actual parameters"

[Terran]

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

Procedure TForm1.Button1Click(Sender: TObject);
Begin
ClientSocket1.Socket.SendText('111');
End;

Ругаеться и пишет что

"Too many actual parameters"

Тут в коде всё в порядке. Поясните пожалуйста по подробнее где именно или по возможности приведите код.

[Terran]

Вот вам примерчик написал по быстренькому, думаю на нём вам будет проще разобраться: Вложение 6109