TImage32.Resize

procedure Resize(newWidth, newHeight: Integer; stretchImage: Boolean = true);


Unlike SetSize, Resize will not erase the existing image. It will either be stretched or cropped depending on the 'stretchImage' parameter.

uses Img32, Img32.Fmt.PNG;
...
var
  img: TImage32;
  rec: TRect;
begin
  img := TImage32.Create;
  img.LoadFromFile('fruit.png');
  img.Resize(100,100);
  img.SaveToFile('fruit_small.png');
  img.Free;
end;
    
Before:
After:

See Also

Scale