请大家帮我看看有什么错误(20分)

Delphi7里TcpSocket和TcpClient之间怎么通讯？我用如下代码：（TcpSocket和TcpClient均已Active）。
procedure TForm1.Button1Click(Sender: TObject);
begin
TcpClient1.Active:=True;
TcpClient1.Sendln(Edit1.Text);
TcpClient1.Active:=False;
end;

procedure TForm1.TcpServer1Accept(Sender: TObject;
ClientSocket: TCustomIpClient);
begin
Edit2.Text:=ClientSocket.Receiveln;
end;

但Edit2里没显示，请问是怎么回事？

怎么没人回答啊？（host,post都设对的）

你的ip设置好了吗？
然后还要设同样的端口？
开2个delphi，相互发数据

我就是这样做的，但还是不行，不知道怎么回事。

真的没人知道吗？