TButton onClick

[jhonny]

Por ejemplo, crea un procedimiento llamado EnElClick, de la siguiente manera...

Código Delphi [-]
procedure TForm1.EnElClick(Sender: TObject);
begin
  ShowMessage('¡¡¡Hola mundo!!!');
end;

Y por ejemplo, en el OnCreate del TForm1, asignas ese procedimiento al evento OnClick del botón llamado Button1, así:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  Button1.OnClick :=  EnElClick;
end;

Y listo.