[dr. F.I.N.]

Сообщение от Snake22

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

Код:

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

end;

Моя одобряет! Грицияс!!