Zitat von
needatip:
...
Sorry, ich hoffe mich nun etwas klarer ausgedrückt zu haben.
Und ich hoffe, das nun richtig verstanden zu haben:
Delphi-Quellcode:
procedure cb1Click(Sender: TObject);
begin
cb2.Visible := cb1.checked;
cb2.checked := (cb1.checked and not cb2.Visible);
//--bzw vereinfacht:
cb2.Checked := false;
end;