Hola, coso. Gracias por responder antes que nada.
Ese codigo que pusistes en mi caso no funcionaria porque el boton de imprimir , es el que crea el reporte , lo prepara, lo imprime y lo destruye.
Algo asi es lo que tengo..
Código Delphi
[-]
Application.CreateForm(Tf_Reporte, f_Reporte);
qrydatos.DisableControls;
f_reporte.RepListas.Prepare;
while not f_reporte.RepListas.Available do
begin
end;
f_reporte.RepListas.Preview;
qrydatos.EnableControls;
No se me ocurrio otra manera de utilizar la propiedad "available".
Y aun asi, se muestra el preview antes de terminar de procesar todos los
registros.
Cualquier monedita sirve..
Gracias