TGroupBox + TCheckBox

[marabu]

Hallo Fabian,

ich vermute, dass du über die CheckBox im Label einer GroupBox diese Enabled setzen möchtest. Wenn dem so ist: Einfach einen leeren String als Label verwenden und eine CheckBox davor setzen:

Delphi-Quellcode:

procedure TDemoForm.CheckBoxClick(Sender: TObject);
begin
  with Sender as TCheckBox do
    GroupBox.Enabled := Checked;
end;

"Label einer TGroupBox" anstelle von "TGroupBoxLabel" hätte deutlich weniger Verwirrung gestiftet.

Freundliche Grüße