Impresion en Epson Tm-300 o Start Sp2000
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.
|