Init-Methode für ein Tabsheet

[DelphiManiac]

Hallo,

ich habe eine Init Methode für mein Tabsheet erstellt:

Delphi-Quellcode:

procedure TFrmPruefungenGUI.InitTabVorbereitung;
var
  I: Integer;
begin
  for I := 0 to tabVorbereitung.ControlCount - 1 do
  begin
    if tabVorbereitung.Controls[I] is TbsSkinCheckRadioBox then
    begin
      (tabVorbereitung.Controls[I] as TbsSkinCheckRadioBox).checked := False;
    end;
    if tabVorbereitung.Controls[I] is TProgressBar then
    begin
      (tabVorbereitung.Controls[I] as TProgressBar).Position := 0;
    end;
  end;
  edt24Volt.Text := '';
  edt5Volt.Text := '';
end;

Hat auch alles funktioniert, die Radioboxen wurden unchecked und die Progressbar sind auf Position 0 gegangen.
Jetzt musste ich allerdings die Radioboxen auf jeweils ein eigenes Panel legen, d.h. jetzt erreiche ich die Checkboxen nicht mehr über das iterieren des Tabpanels.

Wie kann ich dass denn elegant lösen, ohne sowetwas machen zu müssen:

Delphi-Quellcode:

panel1.rb1.checked :=False;
//...

Zur not müsste ich über alle Panels iterieren, aber dann kann ich ja gleich es so machen wie oben,...

Danke schonmal
Gruß
DM