Ver Mensaje Individual
  #1  
Antiguo 04-10-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Reputación: 21
enecumene Va por buen camino
Crear evento a un componente creado en ejecución

Hola compañeros, vengo con esta pequeña duda, estoy creando componentes en tiempo de ejecución, ¿existe alguna forma de crearle un evento como OnClick y llamarlo?.

Saludos.

EDITO: se me olvidó el código:

Código Delphi [-]
constructor TPanel1.Create(aOwner: TComponent);
begin
   inherited;
   with TLabel.Create(aOwner) do
   begin
      Parent := Self;
      Caption := ID;
      Font.Name := 'Tahoma';
      Font.Size := 8;
      Font.Color := clBlack;
      Top := 0;
   end;
   with TLabel.Create(aOwner) do
   begin
      Parent := Self;
      Caption := AUTOR;
      Top := 30;
   end;
   with TImage.Create(aOwner) do
   begin
      Parent := Self;
      Align := alClient;
      Picture.LoadFromFile(FOTO);
      Stretch := True;
   end;
   Width := 200;
   Height := 200;
end;
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.

Última edición por enecumene fecha: 04-10-2008 a las 00:17:33.
Responder Con Cita