![]() |
![]() |
![]() |
![]() |
procedure Tile(newWidth, newHeight: integer; style: TTileFillStyle = tfsRepeat);
uses Img32, Img32.Fmt.PNG; ... var img: TImge32; begin img := TImge32.Create; img.LoadFromFile('.\tile_16.png'); img.Tile(256, 256); img.SaveToFile('.\tile_256.png'); end;
![]() |
Copyright ©2019 Angus Johnson - Image32 ver. 4.0 - Documentation last updated on 20-January-2022