viniciusfbb

uses
  Skia, Skia.FMX.Graphics;

procedure TForm1.SkPaintBox1Draw(ASender: TObject; const ACanvas: ISkCanvas;
  const ADest: TRectF; const AOpacity: Single);
var
  LTextLayout: TSkTextLayout;
  LPaint: ISkPaint;
begin
  LTextLayout := TSkTextLayout.Create;

viniciusfbb

viniciusfbb

function GetResizedImage(const AImage: ISkImage; ATargetWidth, ATargetHeight: Integer;
  ASamplingOptions: TSkSamplingOptions; AProgressive: Boolean = True): ISkImage;

  function MakeResized(const AImage: ISkImage; ANewWidth, ANewHeight: Integer): ISkImage;
  var
    LSurface: ISkSurface;
  begin
    LSurface := TSkSurface.MakeRaster(ANewWidth, ANewHeight);
    LSurface.Canvas.Clear(0);
    LSurface.Canvas.Scale(ANewWidth / AImage.Width, ANewHeight / AImage.Height);

viniciusfbb

program SkiaBlur2;

uses
  System.StartUpCopy,
  FMX.Forms,
  FMX.Skia,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}