Error en Ejecucion de QuickReport

[Kipow]

Una solucion facil seria deshabilitar el boton mientras se prepara el reporte. algo asi:

Código Delphi [-]
          
try                
    botonpreliminar.Enabled := false;                 
    Application.CreateForm(Trep_RepVentas, rep_RepVentas);                
    rep_RepVentas.Preview            
finally                
   botonpreliminar.Enabled := true;                 
   rep_RepVentas.Free;            
end;