1

我正在努力在TImageControl面板内动态创建控件()(以及作为试验/错误的一部分,其他容器控件)。其中一部分,我有一段代码首先清除旧图像:

procedure TfrmImageView.Clear;
begin
  while sbImages.ControlsCount > 0 do
    sbImages.Controls[0].DisposeOf;
end;

这在 Windows 上完美运行。但是,当我在 iPad 上运行它时,它会卡在一个连续的循环中,因为出于某种原因,ControlsCount它总是 1。事实上,即使我从来没有在其中放置任何控件,也会发生这种情况。

为什么此报告始终是 1 个控件?

4

0 回答 0