Delphi 2010中的RadioGroup.ControlCount问题

时间:2010-01-24 09:57:01

标签: delphi radio-button delphi-2010

我想在程序InitRadioGroup()中在运行时设置RadioButton属性。 它失败,因为RadioGroup.ControlCount为0,尽管RadioGroup中有3个RadioButtons。

D2010 RadioGroup有什么问题? 相同的代码在Delphi 2007中运行良好。

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;

1 个答案:

答案 0 :(得分:3)

我假设调用过程时RadioGroup不可见。因此可能不会创建RadioButtons。

致电RadioGroup.HandleNeeded应该为您解决此问题。