[Casimiro Noteví]

pues así mismo:

Código Delphi [-]
     if dbedit1.Text='' then
         dbedit1.Text := '0';

date cuenta que en la comparación sobran los dos puntos, si no, estarías asignando.