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 28-11-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Como Guardar Impresión en Archivo .QRP de QReport????

Uso D6, QReport Prof. 4.0
Necesito guardar el contenido del QReport en un archivo .QRP Automátimente, sin tener que entrar al Preview, quiero que el usuario no intervenga en esto, es como si le dijera al QReport, Reporte.Print, Automaticamente se imprime en la impresora sin entrar al Preview, ya revise en todas las propiedades del QReport y en la busqueda del Foro y no he encontrado nada....

Agradezco cualquier sugerencia.

Última edición por AGAG4 fecha: 28-11-2005 a las 22:32:45. Razón: Corrección
Responder Con Cita
  #2  
Antiguo 28-11-2005
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Prueba con esto:
Cita:
How to save a QuickReport custom preview to text?
Add QREXTRA to your uses clause and use the following code:

Código Delphi [-]
  
  procedure TFPreview.ToolButton3Click(Sender: TObject);
 begin 
   FReport.QuickRep1.ExportToFilter (TQRAsciiExportFilter.Create('c:\report.txt'));
 end;
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #3  
Antiguo 28-11-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Ok

Ok Estoy de acuerdo pero eso es en texto lo cambio a reporte.qrp y al abrir este archivo en Qreport me Marca MetaFile is not valid

Gracias por su respuesta.
Responder Con Cita
  #4  
Antiguo 28-11-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Resuelto....

Lo solucione de esta forma:
Código Delphi [-]
  qReporte.Prepare;
  qReporte.Printer.Save('c:\Repo.qrp');


Saludos...
Responder Con Cita
  #5  
Antiguo 28-11-2005
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Sino mírate este otro ejemplo:
Código Delphi [-]
 procedure TForm1.Button4Click(Sender: TObject);
 begin
   with TQRPHandler.Create do
     try
     Filename := 'c:\Mis documentos\mireporte.qrp';
       Preview;
     finally
       Free;
     end;
 end;

Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #6  
Antiguo 29-11-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
Gracias

Gracias Marcos voy a probarlo, me di cuenta que a como lo hice solo me guarda el contenido antes del Preview, es decir los puros label's sin datos de la tabla relacionada.

Que tenga buen día.
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 12:01:23.


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