TImageRenderer

Ancestors

   |
TCustomRenderer

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;
    

Reference

Methods Properties
In TImageRenderer:
Create BrushImage
Initialize Image
RenderProc Offset
SetTileFillStyle