Incluindo um preview personalizado com o quick report

{No relatorio, criar a procedure SHOWPREVIEW contendo:}

PROCEDURE Showpreview;
begin
preview.showmodal;
end;
{Onde preview e' o nome do form criado para preview nao esquecer de incluir o nome da procedure na cláusula uses. Após isso, deve-se incluir no evento CREATE do formulario principal ou o do relatório o direcionamento do objeto Qprinter, com a seguir:}

qprinter.onpreview:=showpreview;
{
Isto faz com que toda vez que se desejar exibir um preview, o programa abra a rotina 'showpreview', que abre o formulário criado, chamado "preview'.}