[jachguate]

Si queres el "nombre" lo tenes aqui:

Var
  MiBoton : TButton;

Begin
  MiBoton := TButton.Create(self);
  MiBoton.Parent := Self;
  MiBoton.Caption := 'Hola!';
  ShowMessage('El nombre del botón es: ' + MiBoton.Name);
End;

Hasta luego.