带有Wordwrap的Filltext在底部生成gargabe

Question

到目前为止，我们已经有了一个小型日历应用程序，该应用程序在VCL上运行良好，现在我的任务是将其移植到FMX，以便我们可以在Android上使用它。

约会的描述是自动换行的（实际上是唯一被自动换行的文本。）

由于某种原因，FillText函数会在最后一条完全可见的行下方放置垃圾。

以前有人看过吗？

我当然也仅通过表单上的简单面板和以下代码对其进行了测试。 （请记住，面板必须足够小，以使文本在底部溢出。）

在win32上工作正常，但在Android上产生相同的垃圾。

procedure TForm1.Panel1Paint(Sender: TObject; Canvas: TCanvas; const ARect: TRectF);
var
  aText:String;
begin
  aText := 'This is a Taitäl' + #13#10 +
               'Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!! ' + 'Dies ist die Beschreibung!! Dies ist die Beschreibung!!Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!! Dies ist die Beschreibung!!Dies ist die Beschreibung!!';
  Canvas.Fill.Color := TAlphaColors.Black;
  Canvas.FillText(Panel2.LocalRect, aText, True, 1, [], TTextAlign.Leading, TTextAlign.Leading);
end;