请问:一个非常奇怪的 socket 有关问题,帮小弟我看看,多谢

请教:一个非常奇怪的 socket 问题,各位大哥帮我看看,谢谢!
请教:
procedure   TForm1.Button3Click(Sender:   TObject);

begin
            ClientSocket1.Socket.SendText( 'dsddfr ');  
end;

可以把数据发到服务器


procedure   TForm1.Button2Click(Sender:   TObject);
var
          socket1:TClientSocket;
begin
          socket1:=TClientSocket.Create(self);
          try
          socket1.Address:= '192.168.0.118 ';
          socket1.Port:=2000;
          socket1.Open;
          socket1.Socket.SendText( 'hghghj ');
          finally
          socket1.Close;
          FreeAndNil(socket1);
          end;

end;

却不能把数据发到服务器

各位大哥,这是什么原因啊?

谢谢!


------解决方案--------------------
在你的另外一个贴子里回过了,在此不再重复。