paweld/lazarus-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

lazmapviewer: Cosmetic changes

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6833 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz 2019-03-22 23:09:44 +00:00
parent 867942971e
commit ddd6428ace
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/lazmapviewer/source/mvcache.pas
View File

@ -288,7 +288,7 @@ begin
FileName := GetFileName(MapProvider, TileId);
EnterCrit;
try
idx := Cache.IndexOF(FileName);
idx := Cache.IndexOf(FileName);
if idx <> -1 then
Cache.Objects[idx].Free
else
@ -304,7 +304,7 @@ begin
if UseDisk then
begin
if assigned(img) then
if Assigned(img) then
begin
lFile := TFileStream.Create(BasePath + FileName, fmCreate);
try