como crear eventos

[Michel]

Como estas amigos foreros


Como creo un Evento a un objeto creado en tiempo de Ejecución



Ejemplo Yo creo un boton, y, quisiera agregarle un messagebox en el evento Click; como hago


Muchas Gracias...............

[delphi.com.ar]

Ralmente no "creas el evento", lo que haces es asignarle un procedimiento a un evento o propiedad del tipo "procedure of object":

procedure TMiForm.OnButtonClick(Sender: TObject);
begin
  ShowMessage('Hola!!');
end

procedure TMiForm.MiFormCreate(Sender: TObject);
begin
  FButton := TButton.Create;
  FButton.OnClick := OnButtonClick;
end

Saludos!