Problemas con ClientDataSet evento OnChange

[jmlifi]

Trabajo con delphi 2006 .

Tengo un DBGrid donde cambio el valor de la celda(formato), y al saltar a otra celda se ejecuta el siguiente procedimiento, generando así un BUCLE INFINITO:

Código Delphi [-]
procedure TTrabajosFrm.ProgTrabajoFORMATOChange(Sender: TField);
begin
ProgTrabajoPESOCH.AsFloat :=PesoChapa(TrabajosMATERIAL.AsString, Sender.AsString)
end;

En delphi 7 no he tenido ningún problema.

¿a qué se debe?

[[Lepe]]

Parece que no es un buen sitio donde cambiar el valor ¿no?

En el evento que ocurre cuando cambia su propio valor, tú modificas el valor de dicho campo, por tanto vuelve a saltar el evento OnChange.

Quizás sería conveniente usar el evento OnCalcfields del Dataset, por ejemplo.

Saludos

[jmlifi]

Sí, pero saltará sólo una vez, no?.

El evento OnCalcfield del DataSet, también produce bucle infinito.