delphi11 TJPEGImage Scale

`TJPEGImage`的`Scale`方法可以缩放JPEG图像。该方法接受两个参数：缩放后的宽度和高度。示例代码如下：

var
  Jpeg: TJPEGImage;
begin
  Jpeg := TJPEGImage.Create;
  try
    Jpeg.LoadFromFile('image.jpg');
    Jpeg.Scale(100, 100); // 缩放到100x100大小
    Jpeg.SaveToFile('image_scaled.jpg');
  finally
    Jpeg.Free;
  end;
end;

这将从文件中加载JPEG图像，将其缩放为100x100大小，然后将其保存回文件中。您可以根据需要调整缩放后的大小。注意，使用此方法会改变原始图像，因此最好使用副本进行操作。