Ich habe mal versucht das zu reproduzieren, bei mir klappt folgendes allerdings wunderbar:
man nehme ein neues Projekt, ziehe eine CheckBox auf das Formular, erstelle eine OnClick-Methode dafür. Ins OnCreate kommt
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
with TCheckBox.Create(self) do
begin
SetBounds(200,10,100,20);
Parent:=self;
Caption := 'Dynamisch';
OnClick:=@CheckBox1Click;
end;
end;
Dadurch wird eine zweite CheckBox zur Laufzeit erstellt. Ins OnClick kommt:
Delphi-Quellcode:
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
with Sender as TCheckBox do
begin
Font.Color:=clRed;
Font.Bold:=true;
end;
end;
Klickt man jetzt auf eine der CheckBoxen, wird dessen Caption Rot und Fett dargestellt. Klappt also wunderbar
Klappt dieses Minibeispiel bei dir auch?