Delphi 2010中RadioGroup.ControlCount存在问题

我想在运行时的过程InitRadioGroup（）中设置RadioButton属性。 它失败，因为RadioGroup.ControlCount为0，尽管RadioGroup中有3个单选按钮

D2010放射组出了什么问题？ 同样的代码在Delphi2007中运行良好

procedure InitRadioGroup(RadioGroup: TRadioGroup);
var
  i: integer;
  RadioButton: TRadioButton;
begin
  for i := 0 to RadioGroup.ControlCount - 1 do
  begin
    RadioButton := (RadioGroup.Controls[i] as TRadioButton);

    RadioButton.ParentColor := False;
    RadioButton.ParentFont  := False;
    RadioButton.Font.Style  := [];
end;

---

我假设在调用您的过程时，RadioGroup不可见。因此，此时可能不会创建单选按钮

---

调用

RadioGroup.handleneed

应该可以为您解决这个问题。

您是对的。在显示选项卡页显示放射组的位置之前，我初始化了许多放射组。我添加了RadioGroup.HandleNeeded，现在一切正常。非常感谢。