paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-22 15:59:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

fpreport: comments

Browse Source
This commit is contained in:
mattias 2023-07-07 10:24:23 +02:00
parent eb4869669d
commit 9a39842d7a
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/fpreport/fpreportpreview.pas
View File

@ -28,8 +28,7 @@ uses
type type
{ TFPReportPreviewForm } { TFPReportPreviewForm }
// Fool the IDE.
TForm = TCustomFPreportPreviewForm;
TOpenURLEvent = Procedure (Sender : TObject; Const AURL : String) of Object; TOpenURLEvent = Procedure (Sender : TObject; Const AURL : String) of Object;
TFPReportPreviewForm = class(TForm) TFPReportPreviewForm = class(TForm)

4
examples/fpreport/simple/mainlclreport.pas
View File

@ -8,7 +8,9 @@ interface
uses uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls, 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 const
TESTIMAGE = 'powered_by.png'; TESTIMAGE = 'powered_by.png';