Проблема с RadioGroup.ControlCount в Delphi 2010 - PullRequest
Новая
       22

Проблема с RadioGroup.ControlCount в Delphi 2010

1 голос
/ 24 января 2010

Я бы хотел установить свойства RadioButton во время выполнения в процедуре InitRadioGroup (). Сбой, потому что RadioGroup.ControlCount равен 0, хотя в RadioGroup есть 3 RadioButton.

Что не так в RadioGroup D2010? Тот же код отлично работает в 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 Ответ

3 голосов
/ 24 января 2010

Я предполагаю, что RadioGroup не видна при вызове вашей процедуры. Таким образом, RadioButtons не могут быть созданы тогда.

Звонок на RadioGroup.HandleNeeded должен исправить это для вас.

...