Delphi - Como sumar lo del grid para que tenga un total

Hola amigos, como siempre como soy nuevo en Delphi, tengo ciertas duda, y una de ellas es, como sumo el contenido de un grid por ejemplo:

Cod. Articulo Precio Cantidad Importe
01 Cuaderno 10.00 2 20
02 Lapiz .50 2 1.00

Como le hago para que me sume todo el importe del grid y se refleje en el Dbedit que tengo en mi formulario llamado Subtotal. en este caso seria:21.00

Espero me ayuden gracias amigos.

puedes hacerlo de dos formas.
ante todo decirte que te olvides del grid y te centres en la tabla.
el grid es solo un dispositivo de visualizacion, la tabla es la que tiene los registros de verdad.

vamos a sumar, por ejemplo el importe:

importe:=0;
tabla.disableControls;
try
__tabla.first;
__while not tabla.eof do
__begin
____importe:=importe+tabla['importe'];
____tabla.next;
__end;
finally
__tabla.enableControls;
end;

en la variable 'importe' se guarda la suma total de los importes de la tabla.

esta forma es lenta porque delphi tiene que recorrer todos los registros.

otra forma es creandote un query que realice esta funcion. la consulta del query seria algo asi:

select sum(importe)
from tabla

cade vez que abres y cierras el query se actualiza el importe.
puedes ponerlo mas complicado:

select sum(cantidad), sum(importe)
from tabla

aqui te suma tanto la cantidad como el importe