Un Evento comun, distintas variables

[[FGarcia]]

Bien, pues al revisar lo que habia hecho me di cuenta que coloque los checkbox dentro de un panel (en realidad dos paneles con 4 checkbox cada uno) y estos a su vez dentro de un GroupBox, ¿Como saber que checkBox esta seleccionado? Facil, tambien esta la respuesta en club Delphi, en este caso añadi un memo para ver los valores.

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
var 
  Check: TcheckBox;
  I: Integer;
begin
  for I := 0 to ComponentCount - 1 do
    if Components[i] is TCheckBox then
    begin
      Check := Components[i] as TCheckBox;
      if Check.Checked then
        Memo1.Lines.Add(Check.Name  + ' = True')
      else
        Memo1.Lines.Add(Check.Name  + ' = False');
    end
end;