Código Delphi [-] imaVisor.Picture.Assign(Sender as TImage)
imaVisor.Picture.Assign(Sender as TImage)