Preview en Word

[jdangosto]

Hola a tod@s

Se que sobre este tema se ha debatido mucho y existen unos cuantos hilos al respecto.

Os adjunto un código:


if modulo_datos.Query_imp.IsEmpty then
showmessage ('¡¡ Ningún informe que listar en esas fechas!! ')
else
informe.QRLabel6.Caption := mask_fecha_ini.Text;
informe.QRLabel7.Caption := mask_fecha_fin.Text;
informe.QuickRep1.Refresh;
informe.QuickRep1.Preview();
wordapplication.Visible := true;
wordapplication.ActiveDocument.PrintPreview;
wordapplication.Dialogs.Item(wdDialogFilePrint).Show(EmptyParam);
end;




Todo funciona a la perfección y ejecuta el informe con quickreport con los parámetros que le paso.
El problema lo tengo con la previsualización en Word, supuestamente, o al menos entiendo yo, se debería de visualizar el documento en word a la vez, o cuando se cierra el quickreport, pero al cerrar el Preview de QuickReport me da un fallo la previsualización en Word indicando que no se puede "arrancar" porque no hay ningún documento abierto.

¿Qué hago mal?

Gracias