[Paoti]

Hola.

Prueba a hacer esto. (Que es una forma elegante de hacerlo)

1. En el objeto TQuery. en este evento AfterInsert inicializa el valor de la sigguiente forma.

Código Delphi [-]
procedure TForm1.qry1AfterInsert(DataSet: TDataSet);
begin
    // CampoCantidad  es el nombre del campo que quiere inicializar
    qry1.FieldByName('CampoCantidad').AsCurrency := 0;
end;

ahora, lo que veo que estas haciendo es calcular información,


mirate en la ayuda del foro, referente a campos calculados,

consejo: No programes a eventos de los dbedits, trabaja mejor con los eventos del TQuery.

Consejo2. Para evitar conflictos de captura de información en cajas de texto donde quieres números, usa componentes ya especializados que te permiten introducir solo numeros. Tip revisa y documentate sobre estos componentes. http://jvcl.delphi-jedi.org/ hay muchos para evitar el trabajar en validaciones.


Saludos.