uses Img32, Img32.Fmt.PNG, Img32.vector, Img32.Draw; ... var path: TPathD; lgr: TLinearGradientRenderer; imageRenderer: TImageRenderer; begin img := TImage32.Create(256,256); rec := Rect(6,6, 250,250); path := Ellipse(rec); imageRenderer := TImageRenderer.Create(tfsRotate180); imageRenderer.Image.LoadFromResource('TILE', 'BMP'); imageRenderer.Image.Resize(20,20); DrawPolygon(img, path, frEvenOdd, imageRenderer); DrawLine(img, path, 6, clNavy32, esPolygon); img.SaveToFile('tiled_ellipse.png'); imageRenderer.Free; img.Free; end;
Methods | Properties |
---|---|
In TImageRenderer: | |
Create | BrushImage |
Initialize | Image |
RenderProc | Offset |
SetTileFillStyle |
Copyright ©2010-2023 Angus Johnson - Image32 4.8 - Help file built on 17 Jan 2025