[Snake22]

Сообщение от dr. F.I.N.

Должен признать свою неправоту. Как вфыяснилось при написании тест-программы, первым срабатывает OnEnter, а потом уже OnClick - если в OnEnter делать Form.ActiveControl := nil, то у данного чекбокса не срабатывает OnClick и соответственно состояние флажка не меняется

а если так сделать? вроде работает

Код:

procedure TForm1.Change(Sender: TObject);
begin
  Form1.ActiveControl := nil;
  Check.checked:=not Check.checked ;

end;