初学delphi socket编程，请问怎么判断服务端是否在运行？
客户端用tclientsocket，服务端用tserversocket，客户端连接服务端，sendtext( '1 ')，服务端就返回一个字符串，客户端来获取。
现在想客户端连接服务器时先判断一下服务端是否在运行，请问有什么方法判断？

[解决办法]
如果连接成功，就是服务端在运行。
否则，认为服务端不在运行。