paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-03 11:00:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazReport: removed old, inactive code.

Browse Source 
git-svn-id: trunk@61185 -
This commit is contained in:
jesus 2019-05-09 04:56:13 +00:00
parent 30f5f0b09d
commit 123a22f231
1 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
components/lazreport/source/lr_e_csv.pas
View File

@ -17,7 +17,7 @@ interface
uses
Classes, SysUtils, LResources, LazUTF8,
Graphics,GraphType, Controls, Forms, Dialogs,LR_E_TXT,
LCLType,LCLIntf, LCLProc,lr_utils,lr_class;
LCLType,LCLIntf,lr_utils,lr_class;
type
@ -73,11 +73,6 @@ begin
BandTypes := [btMasterHeader,btMasterData,btColumnHeader];
end;
function CompareIntervals(Item1, Item2: Pointer): Integer;
begin
result := ComparePointers({%H-}Pointer(Item1), {%H-}Pointer(Item2));
end;
procedure TfrCSVExportFilter.OnEndPage;
var
i,n: Integer;