Я не могу удалить динамически добавленные кнопки, используя этот код в Firemonkey, в то время как в Windows я успешно удаляю.
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;