Ver Mensaje Individual
  #2  
Antiguo 14-09-2004
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - Espańa
Posts: 18.269
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Crea un procedimiento con los mismos parámetros del evento y cuando creas un objeto le asignas al evento esa rutina.


Código Delphi [-]
(...) 
Img:=TImage.Create(self);
Img.Parent:=self;
Img.Picture.Bitmap.PixelFormat:=pf24bit;
img.Picture.LoadFromFile(imagen.bmp');
Img.Transparent:=true;
img.Stretch:=true;
img.Top:=350;
img.Left:=300;
img.Visible:=true;
// Capturar evento de Doble click
img.OnDblClick := _MyImagenClick;

y el procedimiento lo habrás definido en la parte privada de ésta forma, por ejemplo:

Código Delphi [-]
procedure _MyImagenClick(Sender: TObject);

Para saber los parámetros del procedimiento ten en cuenta que deben ser los mismos del evento que quieres "capturar".
Puedes asignar a varios eventos/componentes el mismo procedimiento.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita