Cara, até agora so sei o de pegar o ping e verificar se o ot ta on:
Para verificar se ta on, basta botar 2 edit(ou um labeledit), 1clientsocket, e um button.
no evento onclick do button bota:
clientsocket1.host:=edit1.text; //no edit1 voce digita o ip do ot
clientesocket1.port:=intostr(edit2.text); // no edit2 vc bota a porta
clientesocket1.enabled:=true; {não lembro se os socket usa enabled ou active basta olhar la}
dai no evento onconect do socket vc bota algo pra avisar q o ot ta on, como uma label, ou uma messagebox
no evento ondisconect vc bota algo pra avisar q o ot ta off...