impresion atomatica

[robero espinoza]

Hola,

Tego un problema espero me puedan ayudar, en mi empresa genero reportes de ventas, antiguedad de saldos, etc.. estos salen de los Quickreport, una vez generados los guardo en archivo para ir llevando un control, pero se hace una junta cada mes, en esta junta se revisan estos reportes, entonce yo diseñe un pagramita esclusivamente para que se revisen estos reportes en las juntas, pero cuando le doy doble click al archivo ya logre que se abra mediante el programita que diseñe, pero el reporte no se muestra, una vez que corrie el programa, me tengo que ir a abrir, buscar el archivo que quiero mostrar y entonce si me lo muestra, lo que yo quiero es que en cuanto le de doble click al archivo se abra el programa y me muestr el reporte y no tenga que buscarlo para poderlo abrir, espero que me entiendan para que me puedan ayudar....

Saludos y Gracias...

[marcoszorrilla]

QRExtra incluye esta "Unit" en tu "Uses".

procedure TForm1.Button3Click(Sender: TObject);

var Dialogo: TOpenDialog;
begin
with TQRPHandler.Create do
try
Dialogo:= tOpenDialog.Create(Application);
Dialogo.Filter:='Archivo QuickReport|*.QRP';
if (Dialogo.Execute) then Filename := Dialogo.Filename;
Dialogo.free;
Preview;
finally
Free;
end;
end;


Un Saludo.