mira te pongo en resumen como lo hago
if TReporte.Iniciar then
begin
Reporte.Query1.Sql ///Paso los parametros de la consulta y activo el TQuery
Reporte.Print //o Preview segun el cas
end;
Iniciar es una funcion de Clase donde creo el reporte:
Reporte := TReporte.Create(Application);
Result := AbreTabla(Tabla)
__________________
...Yo naci en esta ribera del arauca vibr@d0r
Soy hermano de la espuma,
de la garza, de la rosa y del sol...
Viva Venezuela
|