Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 24-02-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 22
AGAG4 Va por buen camino
Resetear una Impresora Epson FX-880

Alguien sabe como mandarle una instrucción en Delphi para Resetear un Impresora Matricial Epson FX-880, lo que pasa es que lo pruebo con asi:
Código Delphi [-]
Procedure TearOff;
Var
  F : TextFile;
begin
  try
    AssignFile(F,'\\TERMINAL1\IMPRESORA');
    Rewrite(F);
    Write(F, #27'@');
  Finally
    CloseFile(F);
  end;
end;
Llamo este procedimiento despues de imprimir en la impresora y al presionar el boton TEAROFF de la misma me saca Correctamente la hoja hasta donde esta el corte de la misma, pero esto lo hace en ocasiones como a la 4ta ó 5ta hoja de imprimir, y cuando no lo hace Correctamente me Saca UNA hoja y MEDIA, la verdad ya le he buscado e investigado y no encuento que pudiera hacer.
Agradezco cualquier ayuda.
Responder Con Cita
  #2  
Antiguo 24-02-2005
Avatar de vic_ia
vic_ia vic_ia is offline
Miembro
 
Registrado: ene 2004
Posts: 238
Poder: 21
vic_ia Va por buen camino
hola...

a mi me ha sucedido con algunos modelos que los caracteres de control no me los acepta correctamente hasta despues de enviar un retorno de carro ... tal vez podrias hacer la prueba...

saludos...
Responder Con Cita
  #3  
Antiguo 01-03-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 22
AGAG4 Va por buen camino
ok....

Gracias por su respuesta voy a probar....
Responder Con Cita
  #4  
Antiguo 02-03-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 22
AGAG4 Va por buen camino
nop

Ya lo probe como me dijo pero no funciono(Write(F, #13#10)), pero si lo pruebo con :
Write(F, #27'@'#13); si me funciona pero aprox. en la 5ta impresión al presionar el botonn TearOff de la impresora me jala una hoja de más en vez de ponerlo al filo del corte de la hoja.

Que tenga buen día.
Responder Con Cita
  #5  
Antiguo 04-03-2005
Avatar de vic_ia
vic_ia vic_ia is offline
Miembro
 
Registrado: ene 2004
Posts: 238
Poder: 21
vic_ia Va por buen camino
hola ...

podrias probar poniendo
Código Delphi [-]
writeln(F, #27'@')

saludos
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 01:08:09.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi