如何在Delphi（FireMonkey）中更改画布FillMode

Question

请在FireMonkey中查看此TPathData，其中包含两个子路径：第一个子路径是外部矩形，第二个子路径在第一个子路径内部：

TmpPathData := TPathData.Create;
TmpPathData.Data := 'M1,1 H100 V100 H1 Z   M30,30 H70 V70 H30 Z';

然后我要在位图上填充此路径，以便：

TmpBmp := TBitmap.Create(200, 200);
TmpBmp.Canvas.Fill.Kind := TBrushKind.Solid;
TmpBmp.Canvas.Fill.Color := TAlphaColors.Blue;
TmpBmp.Canvas.BeginScene;
TmpBmp.Canvas.FillPath(TmpPathData, 1);
TmpBmp.Canvas.EndScene;

结果是这样的：

但是我想得到这个：

因此：如何将FireMonkey中的FillMode从“备用”更改为“缠绕”。

注意：我正在使用Delphi 10.3.3