Ver Mensaje Individual
  #1  
Antiguo 23-02-2012
Avatar de ethangio
ethangio ethangio is offline
Miembro
 
Registrado: jul 2008
Posts: 63
Reputación: 16
ethangio Va por buen camino
imprimir en impresora de red

Buen dia,

Disculpen hace un tiempo abri un hilo ( aqui ) acerca de la impresion y las funciones son algo complejas, y pues no me quise quedar con esa espinita que no cortaba el papel y hacerlo por mi mismo,
ahora ya corta el papel cuando es la impresora esta local , pero en red no se como asignarle la impresora para mandar a imprimir, si mi impresora es de red o que tal si no esta en el com3 y esta en el com1 o com2 ....

Codigo:

Código Delphi [-]
var F : TextFile;
    i, j : integer;
    temp : string;
begin
     AssignFile(F, 'COM3'); // SI MI IMPRESORA ESTA EN RED ? O EN EL COM1, COM2 ?
     Rewrite(F);
     temp := 'hola 0';
     Writeln(F, temp);
     Writeln(F, #13+#10);
     Writeln(F, 'Hola linea 1');
     Writeln(F, #13+#10);
     Writeln(F, 'Hola despues del enter linea 2');
     Writeln(F, #13+#10);
     Writeln(F, #13+#10);
     Writeln(F, #13+#10);
     Writeln(F, #13+#10);//enter
     Writeln(F, #27+#109);//corte de papel
     CloseFile(F);
end;

ya probe con AssignPrm(F) pero con esto no corta la secuencia ni local ni en red aunque si imprime, si escribo directamente al puerto local (con AssignFile(F. 'COM3')) si corta ...

NOTA: Espero no haberlos enredado... saludos
Responder Con Cita