Цитата:
|
Сообщение от 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;