Crear eventos para una clase

[DarkByte]

Buenas tardes.

Estoy intentando crear una especie de evento para una clase que tengo hecha.

Algo así como...

Código Delphi [-]
var
   Socket : TAnibal
begin
  Socket := TAnibal.Create;
  Socket.Ip := '127.0.0.1';
  Socket.Puerto := 60;
  Socket.AlRecibir := Recibir; // ¡Aqui!
  Socket.Conectar;
end;

Se trata de que cuando reciba datos lleve el foco al procedure, con sus comandos y tal... Espero haberme explicado.

Gracias