diff --git a/components/fpreport/fpreportpreview.pas b/components/fpreport/fpreportpreview.pas
index dd455bd42e..d0f9e7f178 100644
--- a/components/fpreport/fpreportpreview.pas
+++ b/components/fpreport/fpreportpreview.pas
@@ -28,8 +28,7 @@ uses
 type
 
   { TFPReportPreviewForm }
-  // Fool the IDE.
-  TForm = TCustomFPreportPreviewForm;
+
   TOpenURLEvent = Procedure (Sender : TObject; Const AURL : String) of Object;
 
   TFPReportPreviewForm = class(TForm)
diff --git a/examples/fpreport/simple/mainlclreport.pas b/examples/fpreport/simple/mainlclreport.pas
index 1f34bbf80e..5f43a99e5e 100644
--- a/examples/fpreport/simple/mainlclreport.pas
+++ b/examples/fpreport/simple/mainlclreport.pas
@@ -8,7 +8,9 @@ interface
 
 uses
   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
-  fpreportlclexport, ExtCtrls, ComCtrls, fpreport;
+  fpreportlclexport, ExtCtrls, ComCtrls, fpreport,
+  // for a nicer preview add this unit: fpreportpreview
+  ;
 
 const
   TESTIMAGE = 'powered_by.png';