procedure TForm1.DataSource1StateChange(Sender: TObject); begin if DataSource1.State in [dsInsert] then Table1.DisableControls else Table1.EnableControls; end;