Impresion en Epson Tm-300 o Start Sp2000

[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.

[newdelphi7]

Mira esta muy sencillo lo que pons pero veo que tienes sentencias sql y yo estoy usando una base de datos paradox.... un ttable un tdbgrid y unos cuantos tdbedit...

Mira para ponerlo mas sencillo tan solo explciame como imprimir el valor almacenado en una variable... o en un tdbedit,..?

Gracias y disculpa pero es que soy new programando en delphi....

[Assolon]

Paradox no lo he utilizado nunca, da igual aqui te pongo un ejemplo que recorre un bucle e imprime los valores de una variable:

var
strMensaje: string;
variable: integer;
iImpresora : TextFile;
begin
Assignfile(iImpresora,'Lpt1'); //Puerto: LPT1, COM1, etc;
Rewrite(iImpresora);
strMensaje := 'Imprimiendo...';
writeln(iImpresora, strMensaje);
for variable:=0 to 10 do begin
// writeln lo que hace es imprimir el valor de 'variable'
// iImpresora es donde estamos escribiendo dicho valor que en nuestro caso es el Lpt1, la impresora.
Writeln(iImpresora, intTostr(variable));
end;

strMensaje := 'Fin de impresion';

writeln(iImpresora, strMensaje);
CloseFile(iImpresora);


//Lo que tiene que salir en la impresora es lo siguiente
Imprimiendo...
0
1
2
3
4
5
6
7
8
9
Fin de impresion

Con esto tiene que acabar tus dudas, sino pillate un manual y empieza desde el principio.

[newdelphi7]

Es decir en realidad nose que es l oque hace, " lo manda a imprimir directamente a la impresora? se podra hacer esto desde php mandar a imprimir de esta mnera, tengo un sistema hecho completamente en php pero no logro mandarlo a imprimir en estas impresoras.

Me invente una aplcaicon en delphi con estos codigos y funciona a la perfeccion solo un detallito, pues el archivo imprimir.exe esta en la pc cliente y el archivo imprimir.txt tambien esta en la pc cliente, desde php no puedo sobreescribir dicho archivo, asi que siempre imprimire lo mismo.... entonces hay dos soluciones y no se como hacerla ninguna de las dos:

1) o mando a imprimir desde php, como o con algunos comandos aprecidos a los anteriores que me dieron ustedes en delphi... ALguien los tiene please ayduame....

2) El archivo a imprimir se alojara en el servidor y llamarlo desde delphi en vez de que este en la pc local sino que abra el *.txt a imprimir desde una pc remotamnete en la red.. es posible eso? alguien que me pueda ayudar please es lo ultimo que necesita mi aplcaicion