Pregunta básica. Como saber si un valor está activo o no.

[[gluglu]]

Yo pensaba que era así !! Pero no me funciona.

En mi caso particular quiere cambiar entre 'editar' y 'no editar' cada vez que pulso la tecla Enter.

No sé que estoy haciendo mal.

procedure TMasterBuilding.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
case Key of
#13: //Enter
Begin
If not (dgEditing in DBGrid1.Options) then
DBGrid1.Options := [dgEditing,dgTitles,dgConfirmDelete,dgCancelOnExit]
else
DBGrid1.Options := [dgRowSelect,dgTitles,dgConfirmDelete,dgCancelOnExit];
......
......
end;
end;
end;