delphi7如何向socket服务器发送字符串

[FrancisW]

我建立了TcpClient1，并把属性设置为active,设好了host和port；
现在通过按按钮butten3向一个server发送字符串，不知道有没有什么简单的方法？如利用函数


顺便，尝试用下面的方法不行，
procedure TForm1.Button3Click(Sender: TObject);
begin
TcpClient1.socket.sendtext('SOS');
end;
会报错，怀疑在delphi7版本下面其函数用法不是这样，请多多指教！

[ly_liuyang]

用Indy的TCPCLient,方便呢~
Connect后Write('Data')那就是

[FrancisW]

报 I/O 出错 105是什么意思啊

[UnkownState]

with ClientSocket1 do
begin
if Socket.Connected then
begin
Socket.SendText('');
end;
end;
先判断是否连接上服务器再发送，105到是见的少

[FrancisW]

谢谢大家，问题解决；添加了socket的package，用indy，用write语句可以发送了，谢谢你们