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

Question

我建立了TcpClient1，并把属性设置为active,设好了host和port；
现在通过按按钮butten3向一个server发送字符串，不知道有没有什么简单的方法？如利用函数
顺便，尝试用下面的方法不行，
procedure TForm1.Button3Click(Sender: TObject);
begin
 TcpClient1.socket.sendtext('SOS');
end;
会报错，怀疑在delphi7版本下面其函数用法不是这样，请多多指教！

Answer 1

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

Answer 2

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

Answer 3

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