paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-23 01:26:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix some warnings/hints about unused identifiers

Browse Source 
git-svn-id: trunk@57842 -
This commit is contained in:
michael 2018-05-08 08:58:13 +00:00
parent be003a0639
commit dedae7d2f1
7 changed files with 6 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/fpreport/design/fpreportdesignctrl.pp
View File

@ -541,7 +541,6 @@ Var
I : Integer; I : Integer;
A : TReportObjectArray; A : TReportObjectArray;
O : TReportObject; O : TReportObject;
B : TFPReportCustomBand;
P : TPoint; P : TPoint;
begin begin

2
components/fpreport/design/frafpreportcsvdata.pp
View File

@ -19,7 +19,7 @@ unit frafpreportcsvdata;
interface interface
uses uses
Classes, SysUtils, FileUtil, Forms, Controls, EditBtn, StdCtrls, fpjson, db, fpreportdata, fpreportdesignreportdata; Classes, SysUtils, FileUtil, Forms, Controls, EditBtn, StdCtrls, fpjson, fpreportdata, fpreportdesignreportdata;
type type
TFrame = TReportDataConfigFrame; TFrame = TReportDataConfigFrame;

1
components/fpreport/design/frafpreportdata.lfm
View File

@ -5,6 +5,7 @@ object ReportDataDisplay: TReportDataDisplay
Width = 327 Width = 327
ClientHeight = 277 ClientHeight = 277
ClientWidth = 327 ClientWidth = 327
LCLVersion = '1.9.0.0'
TabOrder = 0 TabOrder = 0
DesignLeft = 658 DesignLeft = 658
DesignTop = 245 DesignTop = 245

3
components/fpreport/design/frafpreportdata.pp
View File

@ -203,8 +203,7 @@ Const
end; end;
Var Var
DN,N : TTreeNode; N : TTreeNode;
D : TFPReportData;
S,A : String; S,A : String;
I,J : integer; I,J : integer;
ID : TFPBuiltInExprIdentifierDef; ID : TFPBuiltInExprIdentifierDef;

2
components/fpreport/design/frafpreportdbfdata.pp
View File

@ -19,7 +19,7 @@ unit frafpreportdbfdata;
interface interface
uses uses
Classes, SysUtils, dbf, FileUtil, Forms, Controls, EditBtn, StdCtrls, fpjson, fpreportdesignreportdata, db; Classes, SysUtils, dbf, FileUtil, Forms, Controls, EditBtn, StdCtrls, fpjson, fpreportdesignreportdata;
type type
TFrame = TReportDataConfigFrame; TFrame = TReportDataConfigFrame;

2
components/fpreport/design/frafpreportjsondata.pp
View File

@ -20,7 +20,7 @@ interface
uses uses
Classes, SysUtils, FileUtil, Forms, Controls, StdCtrls, EditBtn, Buttons, ActnList, ValEdit, fpjson, fpreportdesignreportdata, db, Classes, SysUtils, FileUtil, Forms, Controls, StdCtrls, EditBtn, Buttons, ActnList, ValEdit, fpjson, fpreportdesignreportdata, db,
dialogs, fpjsondataset; dialogs;
type type
TFrame = TReportDataConfigFrame ; TFrame = TReportDataConfigFrame ;

2
components/fpreport/design/frafpreportsqldbdata.pp
View File

@ -19,7 +19,7 @@ interface
uses uses
Classes, SysUtils, FileUtil, Forms, Controls, EditBtn, StdCtrls, Buttons, ActnList, SynEdit, SynHighlighterSQL, Classes, SysUtils, FileUtil, Forms, Controls, EditBtn, StdCtrls, Buttons, ActnList, SynEdit, SynHighlighterSQL,
fpreportdesignreportdata, fpjson, db, sqldb, fpreportdatasqldb, dialogs; fpreportdesignreportdata, fpjson, sqldb, fpreportdatasqldb, dialogs;
type type
TFrame = TReportDataConfigFrame; TFrame = TReportDataConfigFrame;