Как загрузить и отмасштабировать JPEGImage в TImage

Как загрузить и отмасштабировать JPEGImage в TImage

try
  Image1.Picture.Graphic := nil;
  Image1.Picture.LoadFromFile(jpegfile);
except
  on EInvalidGraphic do
    Image1.Picture.Graphic := nil;
end;
if Image1.Picture.Graphic is TJPEGImage then
begin
  TJPEGImage(Image1.Picture.Graphic).Scale := Self.Scale;
  TJPEGImage(Image1.Picture.Graphic).Performance := jpBestSpeed;
end;

Курсы бухгалтерского учёта 1C: 8: бухгалтерские курсы в казани. Курсы, Казань. . Пресс-форма постоянная. Пресс-форма изготовление. . одежда для сотрудников .