saber el nombre de un control creado en tiempo de ejecucion

[xxxlincexxx]

Gracias por estarme ayudando y les agradesco su paciencia esta es la parte de mi codigo:

var
boton:Array [0..x valor] of TBooton;
n:Integer;
begin
n:=n+1;
Boton[n]:=Tbooton.create;
broton[n].parent:=Self
boton[n].onclick:=otro procedimiento;
end;
de esta manera he creado en tiempo de ejecucion varios botones con un solo boton inicial; mi problema es como puedo reconocer sobre cual boton se llevo acabo el evento on click;
pero no tengo ni idea de como hacerlo; he pensado en recorrer cada uno de los sub indices de array, pero no encuentro manera de identificar cual fue el que recibio el evento.