Código Delphi [-] ImageList1.GetBitmap (1, Image1.Picture.Bitmap); Image1.Repaint;
ImageList1.GetBitmap (1, Image1.Picture.Bitmap); Image1.Repaint;