SOCKET derrubar CLIENTE

vc pode fazer assim:
LbUsers é uma lista com os usuarios conectados...


if LBUsers.ItemIndex = -1 then
exit;
User := LBUsers.Items.Strings[LBUsers.ItemIndex];
if MessageBox(Handle,PChar(´Deseja excluir o usuário ´ ´+User+´ ´ ?´+#13+
´Tem certeza?. Olha lá hein.´),´Confirmar chete do usuário´,Mb_IconWarning+Mb_YesNO) = idYes then
begin
for i:=0 to ServerSocket.Socket.ActiveConnections -1 do
if ServerSocket.Socket.Connections[i].Connected then
begin
Cliente := ServerSocket.Socket.Connections[i].data;
if Cliente^.Nick = User then
begin
Cliente^.Socket.SendText(´MSPGServidor@Você não é mais bem vindo aqui!´);
Cliente^.Socket.Close;
end;
end;
end;

end;

Bom dia a todos!

Gostaria de saber uma forma de comunição do sentido Servidor para um cliente instanciado, sem utilizar o SocketClient e SocketServer, para disparar um evento no meu cliente. Da mesma forma que o Cliente faz com o Server através do AppServer...
Por exemplo derrubar um cliente.

O quanto antes a resposta, melhor, diante mão, grato pela ajuda e atenção de todos.