Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   TButton onClick (https://www.clubdelphi.com/foros/showthread.php?t=63824)

bastian 04-03-2009 17:10:52

TButton onClick
 
estoy creando botones dinamicamente, ahora quiero asignarles un evento
como le hago?

jhonny 04-03-2009 17:18:32

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.


La franja horaria es GMT +2. Ahora son las 15:14:47.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi