Вопросы и ответы

Дата: 2000-07-26 00:00:00

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


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