Главная / DELPHI / Часто задаваемые вопросы и ответы на них / Графика / Как перебросить TImage с jpeg в TBitmap в runtime

Как перебросить TImage с jpeg в TBitmap в runtime

b := TBitmap.Create;
try
  b.Assign(Image1.Picture.Graphic);
  Image2.Picture.Graphic := b;
finally
  b.Free;
end;

Copyright ©   "Мастера DELPHI"   E-mail:   delphi@mastak.com  http://www.delphimaster.ru

Источник получения информации: http://www.delphimaster.ru