qrfactura.Query1.Open;
Esa línea no se para que sirve,
el query1 no esta en el qrFactura, esa línea me tiene confundido.
Deberías de abrir primero el Query1 y despues hacer el preview, bueno, sí lo estas haciendo, pero el Query1 no es parte de qrFactura... solo que qrFactura sea el formulario....
no se
supongo que debería ser:
Código Delphi
[-]
try
qrfactura:=tqrfactura.Create(self);
Query1.Open;
qrfactura.preview;
finally
qrfactura.Free;
end;