Problem mit Code, seit Komponente zur Laufzeit erstellt werd

[Bomberbb]

Die Schleife vorweg kannst Du Dir auch ersparen.
Ich würde es so schreiben...

Delphi-Quellcode:

procedure TForm1.CheckBoxSettingsChange(Sender: TObject);
begin
  with Sender as TCheckbox do 
  begin
    Font.Bold:=checked; 
    if checked then
      Font.Color:=clRed        
    else
      Font.Color:=clBlack;
    Refresh;  
  end;
end;