Delphi - como recorro los campos de una tabla

como puedo recorrer los campos cantidad de una tabla para inventarios

me explico
estoy haciendo un sistema para un supermercado
necesito que cada vez que se abra la aplicacion se despliegle un mensaje indicando si uno de los articulos se esta agotando
ej: if table1['cantidad'] < 20 then
begin
showmessage('se esta agotando el siguiente articulo' + table1['descripcion'] +'solo quedan' + table1['cantidad'])
end;
la pregunta es: como recorro todos los campos para que se desplieguen todos los articulos que se estan agotando

En vez de recorrer la tabla, creo que es mejor que utilices un query.
Algo así:

With Query1 do
begin
close;
sql.clear;
sql.add('select * from articulos where cantidad < 20');
open;
if recordcount > 0 then
begin
form_articulos.showmodal;
end;
end;

siendo form_articulos un form con un dbgrid que muestra el contenido del query