Delphi - Creacion de eventos para objetos en tiempo de ejec

Como puedo crearle un evento a un objeto en tiempo de ejecución.
Por ejemplo: haciendo click en boton1 hago que me aparezca un boton2 (en tiempo de ejecución) y luego lo que quiero hacer y no se como es crearle un evento onclick a boton2.
Gracias por su ayuda.

Hola que tal

Tendras que tener una funcion por ejemplo TForm1.Onclickbutton2, la llamas
como quieras, el nombre es opcional y cuando crees el boton pones lo siguiente

Button:=TButton.Create; //No me acuerdo de los paramentros
.....
Button.OnClick:=TForm1.Onclickbutton2;

Por decirlo de una manera sencilla aunque no se hasta que punto es verdad,
lo que aparece en el Inspector de Objetos son una variables que apuntan a la
funcion que van a ejecutar.

Un saludo y espero que te ayude.

P.D.: me parece que los objetos de un form tienen una propiedad que es el padre
(parent) y cuando creas estos objetos en tiempo de ejecucion se debe asignar esta
propiedad al form, asi no te preocupas de liberar memoria.

Revisa el siguiente codigo:
-------------------------------------------------
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
Boton : TButton;
procedure NuevoClick(Sender: TObject);
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
Boton := TButton.Create(Self);
with (Boton) do begin
Left := 50;
Top := 50;
Parent := Self;
OnClick := NuevoClick;
end;
end;

procedure TForm1.NuevoClick(Sender: TObject);
begin
TButton(Sender).Caption := ´hola mundo´;
end;

end.