[Assolon]

Hola,

Lo que tienes que hacer es recorrer un bucle tanto si es desde un select que hagas a una tabla o si lo tienes almacenado en un dbgrid.

Desde una tabla
Assignfile(iImpresora,'Lpt1'); //Puerto: LPT1, COM1, etc;
Rewrite(iImpresora);
with datos.query01 do begin
SQL.Clear;
SQL.Add('SELECT campo1');
SQL.Add('FROM tabla');
Open;
while(not EOF) do begin
Writeln(iImpresora, FieldByName('Campo1').AsString);
next;
end;
end;
CloseFile(iImpresora);

Bueno yo creo que con este ejemplo ya te vale para las dos opciones.
Suerte y espero que te funcione.