PDA

Ver la Versión Completa : Abrir un reporte (Crystal report) en Delphi


franciscobucio
27-10-2004, 19:16:25
Hola a todos,

Tengo un problema (falto de conocimiento seguramente), necesito abrir un reporte en Delphi 6, el reporte fue hecho en Crystal Reports 7 (componente TCrystalReport). al intentar abrirlo me envía un mensaje de error: "Nombre de archivo no valido", no encuentro cual es el error ya que el archivo se llama exactamente como lo mando llamar. Les agradecería su gran ayuda. El código es el siguiente:

CrystalReport1min.WindowState := crptMaximized;
CrystalReport1min.ReportFileName := 'PorMinuto.rpt';
CrystalReport1min.WindowTitle :='Vista preliminar del REPORTE POR MINUTO';
CrystalReport1min.Action := 1;


De antemano, Gracias!

Saludos
Francisco J. Bucio

NACOSTA
27-10-2004, 22:52:17
Tienes que indicarle el directorio exacto donde se encuentra el reporte.

CrystalReport1min.WindowState := crptMaximized;
CrystalReport1min.ReportFileName := 'C:\PorMinuto.rpt';
CrystalReport1min.WindowTitle :='Vista preliminar del REPORTE POR MINUTO';
CrystalReport1min.Action := 1;

franciscobucio
28-10-2004, 15:45:01
Ok, ya lo hice y funcionó, pero entonces a la hora de generar el instalable, como le puedo hacer para que tome la ruta que yo le indique cuando instale la aplicación en una nueva máquina.

Podrías decirme como?

Gracias

NACOSTA
29-10-2004, 22:47:12
Podrias hacerlo de varias formas:

1. puedes al macenar el direccionamiento en el registro de windows
2. podrias almacenar el direccionamiento en un archivo texto, en la carpeta que instales el ejecutable,
3.puedes al macenar la ubicacion de los reportes en una tabla de tu base, ejemplo tabla parametros.., etc

tu programa lo leeria desde cualquier lugar que le indiques,

por ejemplo

var
Nreporte:string;:D
begin

Nreporte:=nombre_del_reporte;

CrystalReport1min.WindowState := crptMaximized;
CrystalReport1min.ReportFileName :=Nreporte;
CrystalReport1min.WindowTitle :='Vista preliminar del REPORTE POR MINUTO';
CrystalReport1min.Action := 1;