Firemonkey - 从TGridPanelLayout中删除运行时生成的按钮

Question

在Windows中成功删除时，我无法在Firemonkey中使用此代码删除动态添加的按钮。

while GridPanelLayout7.ControlCount > 0 do
   GridPanelLayout7.Controls[0].Free;

我的问题是为什么这可以在32位Windows上运行，但在Android平台上不起作用？

添加动态按钮的步骤是：

     btn := TButton.Create(nil);
     btn.Parent := GridPanelLayout7;
     btn.Align  := TAlignLayout.Client;
     btn.Text   := 'example';
     btn.TextSettings.WordWrap :=true;
     btn.OnClick := Btn_Click;

我也尝试添加此代码，但它是相同的：

    for I := 0 to GridPanelLayout7.ControlsCount - 1 do
    begin
     GridPanelLayout7.Controls[0].Free;
    end;