问一个关于ClientSocket使用的问题(0分)

procedure TForm1.Button1Click(Sender: TObject);
begin
ClientSocket1.Host :=edit1.Text ;
ClientSocket1.port:=80;
ClientSocket1.Active :=true;
ClientSocket1.Socket.SendText(memo1.Text );
end;


procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket);
begin
memo1.Text :=Socket.ReceiveText ;
end;
这之间有什么错误吗，我用SERVERSOCKET的OnRead事件中Socket.SentText，在ClientSocket1Read似乎只能收到一次，再发就收不到了？

如果我在memo1中的内容为下面数据(此时无seversocket)；
GET http://www.edu.cn/ HTTP/1.0
Accept: */*
Accept-Language: zh-cn
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 5.0; Windows NT)
Host: www.edu.cn
在HOST中指明是www.edu.cn 端口80,模拟发送http的消息，为什么
指示已连接，却无法读到数据？

在ClientSocket1connect里写ClientSocket1.Socket.SendText(memo1.Text );
在ClientSocket1read里写:
memo1.Text :=Socket.ReceiveText ;
ClientSocket1.Socket.SendText(memo1.Text );