CLIENT不能发送数据到SERVER端？(10分)

我要实现SOCKET控件CLIENT与SERVER之间的通讯，在CLIENT端BUTTON的ONCLICK事件
代码如下：
ClientSocket1.Close;
ClientSocket1.Port:=3000;
ClientSocket1.Open;
ClientSocket1.Socket.SendText(data.Text);
SERVER端ONCLIENTCONNET事件代码如下：
SpeedButton5.Click;
LForm.LPageControl1.ActivePageIndex:=5;
LForm.LADOQuery1.Insert;
ONCLIENTREAD事件代码如下：
data:=tStringList.Create;
data.Clear;
data.Text:=Socket.ReceiveText;
然后在把DATA是值分别记如数据库，但是我读取不到DATA的值！为什么？

有没有建立正确的连接啊,你先确定啊!
你把情况讲详细点,我帮你分析

接受答案了.