setfocus no grid

pessoal to com um problemão


tenho um grid onde o usuario altera o registro so com o click

explicando melhor em um campo determinado se tiver o valor um e a pessoa clicar ele fica 0 e se tiver 0 ele fica 1

estou usando esse codigo>

begin
if Column.FieldName = ´configuracao´ then
begin
Dtm.ClientDataSet_usu.Edit;
if (Dtm.ClientDataSet_usu.FieldByName(´configuracao´).AsString = ´1´)then
begin
(Dtm.ClientDataSet_usu.FieldByName(´configuracao´).AsString:= ´0´ );
end
else
begin
Dtm.ClientDataSet_usu.FieldByName(´configuracao´).AsString:= ´1´;
end;
Dtm.ClientDataSet_usu.Post;


end;
end;

so que notei que alguns campos da falha se o usuario ficar mudando repetitivamente só não da erro de ele mudar clicar em outra celula e voltar lá e mudar denovo....

algume pode me dar uma luz de com eu fazer isso via código.
sei lá criar um campo especifico para receber o click ai a pessoa não tem que adivinha a jogadinha....