Veran tengo una aplicación en la cual creo en diseño un conjunto de imagenes las cuales las leo de un campo Image en SQL, lo hace bien y me crea tantos images como fotografias tenga guardadas en determinada tabla el problema que tengo es que necesito crear en cada una de las imagenes un evento click el cual me pase al darle click a cualquiera de esas imagenes me las muestre en otro Image Grande que tengo en la forma
Con esto creo las imagenes
Código Delphi
[-]
with image do
begin
image.Picture.Assign(Jpg);
image.Parent := panel11;
image.Top := 0;
image.left := izquierda;
width := 100;
height := 100;
stretch := true;
image.OnClick := pasImagen;
end;
y esto tiene el evento pasImagen con el cual quiero que cuando se le de un click a la imagen que yo creo en el procedimiento de arriba me lo pase a imaVisor
Código Delphi
[-]
procedure TConPropiedadF.pasImagen(Sender: TObject);
begin
imaVisor.Picture.Assign(image.picture);
end;
Trabajo con Delphi 5.0 si me pueden ayudar se los agradeceria mucho