pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fpspreadsheet: Clean up searching routines.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8080 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2021-08-26 13:19:10 +00:00
parent 9448894c7c
commit dba75889aa
3 changed files with 1 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/fpspreadsheet/examples/other/searching/demo_search.lpi
View File

@ -35,15 +35,11 @@
<PackageName Value="laz_fpspreadsheet"/>
</Item1>
</RequiredPackages>
<Units Count="2">
<Units Count="1">
<Unit0>
<Filename Value="demo_search.pas"/>
<IsPartOfProject Value="True"/>
</Unit0>
<Unit1>
<Filename Value="..\..\source\common\fpsexprparser.pas"/>
<IsPartOfProject Value="True"/>
</Unit1>
</Units>
</ProjectOptions>
<CompilerOptions>

1
components/fpspreadsheet/examples/other/searching/demo_search.pas
View File

@ -12,7 +12,6 @@ uses
var
workbook: TsWorkbook;
worksheet: TsWorksheet;
s: String;
searchParams: TsSearchParams;
rowFound, colFound: Cardinal;
worksheetFound: TsWorksheet;

3
components/fpspreadsheet/source/common/fpspreadsheet.pas
View File

@ -751,7 +751,6 @@ type
FOnRemovingWorksheet: TsWorksheetEvent;
FOnSelectWorksheet: TsWorksheetEvent;
FOnReadCellData: TsWorkbookReadCellDataEvent;
FSearchEngine: TObject;
FCryptoInfo: TsCryptoInfo;
FMetaData: TsMetaData;
{FrevisionsCrypto: TsCryptoInfo;} // Commented out because it needs revision handling
@ -6323,8 +6322,6 @@ begin
RemoveAllEmbeddedObj;
FEmbeddedObjList.Free;
FreeAndNil(FSearchEngine);
inherited Destroy;
end;