Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-10-2003
Firibiri Firibiri is offline
Miembro
 
Registrado: oct 2003
Ubicación: Barcelona
Posts: 33
Poder: 0
Firibiri Va por buen camino
Unhappy Imprimir con word en impresora en concreto

Hola a todos.Estoy haciendo una aplicación que abre un documento de word (sin ser visible para el cliente)modifico el documento y lo imprimo por una impresora en concreto "zetafax printer" para que sea enviado por fax.
El problema es que una vez finalizado el proceso se me queda ésta impresora como la predeterminada de windows.Alguien me puede decir cómo puedo dejar como predeterminada la que tenia antes del proceso...
Gracias de antemano

El código es este:

try
word := GetActiveOleObject('Word.Basic');
except
word := CreateOleObject('Word.Basic');
end;

try
word.Fileopen("nombre fichero word");
word.ViewHeader;
word.Insert('texto a insertar');
word.CenterPara;
WORD.ToolsOptionsPrint(Background:=0);//no se ve

word.Fileprint(NumCopies:='1');

word.fileprintsetup(printer:='Zetafax Printer on ZETAFAX.SPL');//pone a predeterminada la zetafaz printer
finally
WORD.ToolsOptionsPrint(Background:=1);
WORD.FILECLOSE(2);//EL 2 ES PARA SALIR SIN GUARDAR
WORD.FILEEXIT;
WORD:=UnAssigned;
end;
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:52:52.


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